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Preface 


This guide is intended to assist in the installation of Rimfire® 3500 Series 
VMEbus SCSI host bus adapters in Sun® Microsystems Workstations. Unless 
otherwise specified, references to the Rimfire 3500 adapter indicate any of the 
mentioned models. 

The following items are recommended for successful hardware and software 
installation: 

Equipment: 

• Sun-3 or Sun-4 Workstation with a tape drive (1/4 inch or 1/2 inch) or 
disk drive (5-1/4 inch) 

• Rimfire 3500 Series VMEbus SCSI host bus adapter 

• SunOS distribution tapes 

• SCSI drives and cabling 

• Ciprico’s SunOS driver 

References: 

• Sun Microsystems’ documentation and reference manual(s) for the 
appropriate Sun Workstation 

• The appropriate drive manufacturer’s reference manual(s) 


®Ciprico and Rimfire are registered trademarks of Ciprico Incorporated. Sun is a registered 
trademark of Sun Microsystems, Inc. 

™ Maxtor is a trademark of Maxtor Corporation. 

™ Micropolis is a trademark of Micropolis Corporation. 

™ Miniscribe is a trademark of Miniscribe Corporation 

™ Sun-3, Sun-4, Sun Microsystems, Sun Workstation, SPARC, and SunOS are trademarks of Sun 
Microsystems, Inc. 

™ UNIX is a trademark of Bell Telephone Laboratories, Inc. 

™ Wangtek is a trademark of Wang Laboratories, Inc. 

™ Wren is a trademark of Control Data Corporation. 
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History 

Revision Date Description 

B 10.13.89 Class ‘B’ Manual that contains 

preliminary Rimfire 3523 information, 
as well as Rimfire 3500 SunOS Device 
Driver information. 

A 12.01.89 Addition of updated installation script 

information for bootable and 
non-bootable sections, and updated 
SunOS Device Driver information. 

A 01.12.89 Minor update to SunOS Device Driver 

manual installation information. 


ii 




Table of Contents 


Section 1 - Introduction 1-1 

Section 2 - Bootable Adapter Installation 2-1 

Hardware Installation 2-2 

Board Configuration 2-5 

Adapter Installation 2-6 

Software Installation 2-9 

Loading the SunOS Boot 2-10 

Loading and Configuring the Standalone cs35ut 2-11 

Creating a Disk Label 2-13 

Formatting and Verifying Drives .2-15 

Loading the SunOS 2-16 

Installing the Ciprico Driver 2-17 

Adding Adapters to the System 2-29 

Making Filesystems 2-29 

Section 3 - Non-bootable Adapter Installation 3-1 

Hardware Installation 3-2 

Board Configuration 3-2 

Adapter Installation 3-6 

Software Installation 3-9 

Installing the Ciprico Driver 3-10 

Adding Adapters to the System 3-19 

Making Filesystems 3-20 

Appendix A - Specifications A-1 

Appendix B - cs35ut Program B-1 

cs35ut Commands B-1 


iii 





Preface 


Commands for All Device Types B-4 

Commands for Disk Devices B-6 

Commands for Tape devices B-l 1 

Appendix C - Unit Options Defines C-1 

Disk Drive Defines C-3 

Tape Drive Defines C-5 

Floppy Drive Defines C-7 

Appendix D - Manually Making Device Nodes D-1 

Disk Devices D-1 

Tape Devices D-2 

Dummy Devices D-2 

Appendix E - Error Codes E-1 

Rimfire 3500 Error Code Descriptions E-1 

Diagnostic Errors E-7 

Internal Errors E-7 

Boot Emulation Errors E-8 

Appendix F - Cables and Connections F-1 

Appendix G - Manual Driver Installation G-1 

Driver Installation - SunOS 3.5 or Earlier G-1 

Driver Installation - SunOS 4.0 or later G- 16 

Appendix H - Using the Make Node Utility H-1 

iv 


Preface 


Appendix i - Adding a Device Manufacturer to the 

Installation Script 1-1 


v 




Figures 


Section 1 - Introduction 1-1 

Figure 2-1 Rimfire 3523 Emulation Jumpers 1-1 

Figure 2-2 Rimfire 3523 Jumpers 1-2 

Section 2 - Bootable Adapter Installation 2-1 

Figure 2-3 BUS GRANT and IACK Jumpers 2-7 

Figure 2-4 SCSI Drive Cable Connection 2-8 

Section 3 - Non-bootable Adapter Installation 3-1 

Figure 3-1 Rimfire 3501/3503 Jumpers 3-3 

Figure 3-2 Rimfire 351 1/3512/3513/3514/3515 Jumpers 3-4 

Figure 3-3 Rimfire 3517/3518 Jumpers 3-5 

Figure 3-4 BUS GRANT and IACK Jumpers 3-7 

Figure 3-5 Cable Connections 3-8 

Appendix F - Cables and Connections F-1 

Figure F- 1 Rimfire 3500 Interconnection Diagram F-1 

Figure F-2 Rimfire 3500 Series Cable Connections F-2 

Figure F-3 Rimfire 3523 Interconnection Diagram F-3 


VI 



Tables 


Appendix B - cs35ut Program B-1 

Table B-1 cs35ut Disk Device Commands B-1 

Table B-3 cs35ut Dummy Device Commands B-2 

Table B-2 cs35ut Tape Device Commands B-2 

Appendix C - Unit Options Defines C-1 

Table C-l Unit Options Flag Defines (Disk & Tape) C-1 

Table C-3 Unit Options Flag Defines (Floppy) C-2 

Table C-2 Request Sense Count C-2 

ndix F - Cables and Connections F-1 

Table F-l Rimfire 3500 Series Cable Parts F-2 

Table F-2 Rimfire 3523 P2 SCSI On-board Cable F-4 

Table F-3 Rimfire 3523 Inside Cabinet Cable (Unshielded) F-4 

Table F-4 Rimfire 3523 J1 Shielded Cable F-4 

Table F-5 J1 - SCSI Single Ended Interface F-6 

Table F-6 J1 - SCSI Differential Interface F-7 

Table F-7 J2 - Floppy Disk Interface F-8 

Table F-8 PI - VMEbus Pin Assignments F-9 

Table F-9 P2 - Rimfire 3500 VMEbus/SCSI Pin Assignments F-10 

Table F-10 P2 - Rimfire 3523 VMEbus/SCSI Pin Assignments F-l 1 

Appendix H - Using the Make Node Utility 3-1 

Table H-l cs35mk Commands 3-1 


vii 





Section 1 - Introduction 


The Ciprico Rimfire 3500 Host Bus Adapter is a high performance dual function 
SCSI host bus adapter and floppy disk controller for the VMEbus. Including the 
Rimfire 3500 itself, eight SCSI bus devices (target ID values) are supported. 

With the optional floppy-disk controller, up to four ANSI 

X3.80-l981/SA-450-compatible floppy-disk drives are supported. SCSI bus data 
rates of 2.0 Mbytes/second in asynchronous mode and 5.0 Mbytes/second in 
synchronous mode are supported, while the floppy port can support data rates of 
250 kHz and 500 kHz. System bus transfers can be sustained at SCSI bus data 
rates with burst rate capability of up to 20 Mbytes/second with minimum memory 
response time, or 30 Mbytes/second using block mode transfers. 

One key to the Rimfire 3500 adapter’s excellent system bus performance is the 
Short Burst FIFO (SBF). The SBF is a proprietary gate array developed by 
Ciprico and used to interface system buses and on-board data paths. The gate 
array is 32 bytes deep, 32 bits wide, and contains built-in byte and word 
swapping logic. The VMEbus interface is also 32 bits wide and supports 32-bit 
addressing. 

SCSI bus support of the Rimfire 3500 adapter includes the use of pass-through 
commands, providing flexibility in the use of features available from different 
peripheral vendors. SCSI commands are passed to the board via a system 
memory resident circular command queue. This technique allows the system to 
add commands to the queue as soon as they are ready, with no timing restrictions. 
The adapter can extract multiple commands from the queue for processing; 
allowing it to overlap SCSI bus operations using the disconnect/reconnect feature 
of the SCSI bus. Connections to the bus are through the faceplate connectors and 
support either single-ended or differential bus transceivers. 

For applications requiring cost effective floppy support, the Rimfire 3500 adapter 
provides an optional floppy port. A local memory buffer for floppy data allows 
concurrent operations on the SCSI bus and floppy port without degrading SCSI 
performance. 
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Section 1 - Introduction 


The Rimfire 3523 Sun-bootable SCSI adapter operates as a Rimfire 3500 
SCSI-only board with Sun system-boot capability. It emulates the Sun 472 
1/2-inch tape controller to boot SCSI 1/4-inch tape devices, and it emulates the 
Sun 45 1 SMD controller to boot SCSI direct access devices. 
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Section 2 - Bootable Adapter Installation 


This section describes procedures for installing the Rimfire 3523 bootable adapter 
in a Sun Microsystems’ workstation. The information may vary between Sun 
Workstations and versions of SunOS. 

This section contains references, values, and file names (for example sunX or 4.X) 
that represent the Sun system and version of SunOS you are using. When X is 
used, it should be replaced by the version number of your software or hardware. 

In addition, examples in this section include values and file names that may differ 
from the display on your screen due to variations in system configuration. 

In this section, bold type indicates a system-dependent variable. 
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Section 2 - Bootable Adapter Installation 


Hardware Installation 

This section describes installation of the Rimfire 3523 bootable adapter in Sun 
Microsystems’ workstations. Installation procedures are dependent on the model 
of Sun workstation. 

Required Equipment: 

• Sun 3, Sun 4, or SPARC Workstation 

• Rimfire 3523 VMEbus SCSI adapter 

To perform hardware installation, UNIX must be shut down and the Sun system 
powered off. Because there is exposed line voltage, disconnect the power cord 
from the system. Be sure to control the static electricity. 

The following diagram illustrates Rimfire 3523 addressing. Suppose the first 
Rimfire 3523 adapter is to be the primary adapter used for booting. There would 
also be a second Rimfire 3523 adapter that may be used for adding devices. The 
adapters would be addressed as follows: 



Disk 

Emiijatibn 

Address 

Tape 

Emulation 
. Address: 

Rimfire 

Disk 

Address 

Rimfire 

••U:# • Tape- 
Address 

1st Rimfire 





3523: 

2nd 

0xEE40 

0xEE60 

0x5000 

0x5000 

Rimfire 

3523*: 

N/A 

N/A 

0x5500 

0x5500 


* The second Rimfire 3523 adapter (at address 0x5500) is for adding 
devices. It is not bootable. 

Figures 2-1 and 2-2 show the Rimfire 3523 jumpers. 
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Figure 2-2 Rimfire 3523 Jumpers 
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Section 2 - Bootable Adapter Installation 


Board Configuration 

Figures 2-1 and 2-2 illustrate jumper locations and their factory settings. Unless 
otherwise indicated, a jumper is set to 0 if the jumper is in, and set to 1 if the 
jumper is out. Inspect your Rimfire 3523 adapter for proper jumper settings. Pay 
particular attention to the following items: 

• The disabled jumper for JTL ,and JD4L or JD7L, must be out for the 
Rimfire 3523 adapter to emulate a Sun boot adapter. 

• The address jumpers at JMP3 (A9-A15) set the Rimfire 3523 address. 

The Rimfire 3523 address is dependent on whether the adapter is the first 
(address = 0x5000) or second (address = 0x5500) Rimfire adapter in 
your system. 

• The combined settings of the address jumpers at JD4L (A3-A7) and JDU 
(A8-A15) set the boot disk emulation address. 

• The combined settings of the address jumpers at JTL (A3- A7) and JTU 
(A8-A15) set the boot tape emulation address. 

Following are descriptions of the emulation control jumpers: 

ID2-ID0 Specifies the SCSI ID for the adapter. Jumper ID 0 gives default 
ID 6. 

PAR When this jumper is in, SCSI bus parity checking is enabled. 

When this jumper is out (the default), SCSI parity is disabled. 

Valid When this jumper is in, jumpers TLUN, VARB, DLUN, and EXRW 
are enabled. When this jumper is out, the adapter firmware 
determines the proper configuration specified by these jumpers for 
the attached peripherals. 

NU Reserved 

EXRW When this jumper is in, SCSI direct-access devices use 2AH/28H 
SCSI R/W commands. When this jumper is out, SCSI 
direct-access devices use 08H/0AH. 

DLUN When this jumper is in, xyl (the second boot emulation disk) is 
SCSI LUN 1 of target 0. When this jumper is out, xyl is SCSI 
LUN 0 of target 1. 
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Section 2 - Bootable Adapter Installation 


VARB When this jumper is in, SCSI tape commands are variable block. 

When this jumper is out, SCSI tape commands are fixed block. 

TLUN When this jumper is in, xtl ( the second non-bootable emulation 

tape) is LUN 1 of target 4. When this jumper is out, xtl is LUN 0 
of target 5. 


NOTE: The first boot disk xy0 is SCSI LUN 0 of target 0 . Boot 

tape xt0 is SCSI LUN 0 of target 4. 


Adapter Installation 

1. VME card slots on the Sun workstation are covered by metal plates. 

Inside each slot, are EMI plates. Select an unused slot and remove the 
two hex head screws holding the cover plate on the rear of the system. 
Remove the cover plate and slide the EMI plate out of the slot. 

2. Rimfire 3523 adapters are Sun-sized cards and will fit directly into the 
card cage. Insen the Rimfire 3523 adapter into the slot, pressing it firmly 
into the connectors. 

3. Fasten the adapter into place with the hex head screws from the rear cover 
plate. 

4. Remove the front cover plate from the workstation to allow access to the 
backplane. On some Sun Workstations, you will also need to move the 
power supply to access the backplane. If so, remove the four screws 
holding the power supply cover and tilt open the power supply. Others 
may have a small removable panel allowing access to just the jumper area 
of the backplane. 


WARNING 

v When the power-supply cover is 
removed, line voltage is exposed. 


2-6 


Rimfire 3500 Installation Guide 




• # 


Section 2 - Bootable Adapter Installation 


5. Locate the slot being used. (The number is to the right of the connector.) 
Remove the BUS GRANT 3 and IACK jumpers (it is a good idea to simply 
move the jumpers down one pin so they are available, if needed). Figure 
2-3 illustrates the BUS GRANT and IACK jumpers for a given slot. 


Deskside & Rack Mounted Systems 

BG0 Desktop Systems 

BG1 
BG2 
BG3 

■ Remove 

IACK 


Remove 

/\ 



• • 


BG0 BG1 BG2 BG3 


IACK 


Figure 2-3 BUS GRAlNT and IACK Jumpers 


NOTE: The BUS GRANT 3 and IACK jumpers must be removed for 

the Rimfire 3523 adapter to operate properly. 


6. If you moved the power supply to access the backplane, tilt the power 
supply back to its original position and refasten the power supply cover. 

7. Replace the front cover plate (if there is one on your particular system). 

8. Connect the drive cables. To set up the Rimfire 3523 to connect to the 
Sun internal SCSI drives, place the board in the slot with the SCSI cable 
on the P2 connector (slot 7 TYP.) Add a 15-inch cable from J1A to JP2. 
If you are using both the internal and external SCSI cables, remove 
terminators RP1, RP2, and RP3. Verify that the terminators are installed 
on the devices at the end of both cables. Refer to Appendix F for 
information about cables. 
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Section 2 - Bootable Adapter Installation 


If you are using only the internal cable or the external cable, leave 
terminators RP1, RP2, and RP3 installed. Figure 2-4 illustrates cable 
connection. 



Figure 2-4 SCSI Drive Cable Connection 


9. Check the drives to ensure that drive parameters (addressing, terminators, 
sector switches, etc.) are correct. Consult your drive manufacturer’s 
manual for recommended drive settings. 

10. Power on the Sun system and drives, and check for proper operation. If 
the board is operating correctly, the Fail (red) and Busy (green) lights 
flash and turn off. 


STOP 

This concludestbehardware 
installation procedure for the Rimfire 
3523 bootable SCSI adapter: For 
information about software installation 
continue with this chapter. 

-• J 


2-8 


Rimfire 3500 Installation Guide 



Section 2 - Bootable Adapter Installation 


Software Installation 

The remainder of this section describes steps for installing SunOS and the Rimfire 
driver. 

The examples and procedures shown assume you are using 1/4 inch tape and 
installing the Rimfire 3523 adapter as the primary boot adapter. 


*+ NOTE: Because most SCSI disk drives are pre-formatted, formatting 

and verifying drives may not be necessary. However, if you 
format the drive, you must use the Ciprico standalone 

utility. 

If you are installing the Rimfire 3523 adapter as a 
non-bootable adapter, see Section 3 for installation 

procedures. 


References: 

• Sun Microsystems’ documentation and reference manuals for the 
appropriate Sun Workstation 

• The appropriate drive manufacturer’s reference manual 
Required Equipment: 

• Sun 3, Sun 4, or SPARC Workstation with 1/4-inch tape drive, or access 
(through a network) to a 1/4-inch tape drive 

• Rimfire 3523 SCSI adapter 

• SunOS distribution tapes 

• Ciprico’s Utility and Installation tape (includes the Ciprico driver) 
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Loading the SunOS Boot 

1. Power on the system. 

2. After the memory check is complete, abort the boot process. 

NOTE: The keys used to abort the boot process will vary with the 

keyboard you are using. 


3. Insen tape 1 of the Sun Operating System release tapes into the tape drive. 


4. At the monitor prompt, load the bootstrap program from the tape. 

Enter the following information: 

b xt ( ) 

5. After the boot prompt appears on the screen, remove the SunOS release 
tape. 

6. When the Rimfire 3523 is in emulation mode, or when a Rimfire 35XX is 
running a standalone program, it expects the target IDs and device types 
shown in this table: 


Unit Device Type Target ID 

0 disk 0 

1 disk 1 

2 disk 2 

3 disk 3 

4 tape 4 

5 tape 5 


LUN 

0 

0 

0 

0 

0 

0 


Ensure that your devices are set to the proper target IDs. 
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Loading and Configuring the Standalone cs35ut 

1. Insert the Ciprico Utility and Installation tape into the tape drive. 

2. Load the Rimfire 3500 Standalone cs35ut program. The characters you 
enter to load the program vary with the system you are using. For 
example, enter xt(0,0,l) if your system is 68020 based, xt(0,0,2) if your 
system is SPARC (Sun 4) based, and xt(0,0,3) if your system is 68030 
based. Enter the appropriate characters for the system you are using. 

3. After the Standalone cs35ut program is loaded, the following device table 
showing the possible device configurations appears: 


Unit Device Type Target ID 

0 disk 0 

1 disk 1 

2 disk 2 

3 disk 3 

4 tape 4 

5 tape 5 


LUN 

0 

0 

0 

0 

0 

*0 


When the Rimfire 3523 is in emulation mode, it expects the configuration, 
with the target IDs and device types, shown in the foregoing device table. 
It is possible to boot from Unit 0, Unit 1, Unit 4 or Unit 5. This 
configuration only needs to be followed for devices that are intended for 
boot devices, or other devices that you wish to run with the Standalone 
utility. The user is prompted to hit the Enter key when done reading the 
information. 

4. Next a device manufacturer menu is displayed, allowing the user to enter 
in a device maufacturer for each unit. The device manufacturer is used to 
determine special unit options for each unit. If a device manufacturer is 
not in the menu for your particular device, just enter the selection for 
"Other". If there is not a device connected for the unit number you are 
prompted for, just enter the selection for "No device present". If "Other" 
is selected, 0 is the unit options value for that device. See Appendix C for 
more information. 
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In the following example, the user has a Hewlett Packard disk as Unit 0, 
and an Archive tape drive for Unit 4. Therefore, the Hewlett Packard 
drive must be set for target id 0, and the Archive tape drive must be set for 
target id 4. 


Device Type Menu 

1 . Micropolis . 

2 . Maxtor 

3. Hewlett Packard 

4 . Miniscribe 

5 . Fujitsu 

6 . Wren 

7 . WrenV 

8 . Wangtek 

9 . Archive 

10. Other 

11. No device present 

Enter the number from the menu above 


for 

Unit 

0 

(disk) 

3 

for 

Unit 

1 

(disk) 

11 

for 

Unit 

2 

(disk) 

11 

for 

Unit 

3 

(disk) 

11 

for 

Unit 

4 

(tape) 

9 

for 

Unit 

5 

(tape) 

11 


5. Next a prompt requests the hexadecimal address of the Rimfire 3523 
adapter. Enter the hexadecimal address of the Rimfire 3523 adapter and 
press the Enter key. This address is 5000 for the first adapter and 5500 
for the second adapter. 

6. A prompt requests the unit that is to be worked with. Enter a unit number 
from the table above. 


NOTE: If you have selected a disk that has not been previously 

formatted using a Rimfire 35XX series adapter, the message 
The disk may not exist or be formatted appears. 
Disregard the error message and proceed to the next step. 
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7. A prompt (TERM =) requests the type of terminal that will be used. Some 
common terminal types are listed below. 

adm3 

adm3a 

sun 

sun24 

tvi925 

tvi9206 

vt52 

vtlOO 

8. Enter the appropriate type. 

9. After specifying the type of terminal, the main menu appears. Create a 
label, and format and verify the drives using the procedures in the 
following section. 


Creating a Disk Label 

1. By default, the unit you selected in step 6 of "Loading and Configuring 
the Standalone cs35ut" section is opened. The following menu appears: 


Open Device: /dev/rrsOa 

cs35ut> 

Available Disk Commands: 
a Start Device 

b Debug control 

c Identify Controller 

d Read Capacity 

f Format Disk 

1 Choose Label 

m Map Sectors 




Size: 16320 

o 

Open 

a new device 

q 

Quit 


r 

Read 

and Display Label 

u 

Stop 

Device 

V 

Verify Disk Format 

w 

Write 

: Label to Disk 


If you want to open a different drive, select O from the main menu and 
enter /dev/rrsXa (for disk) or rrtX (for tape), where X indicates the drive 
number (0 = Unit 0, 1 = Unit 1,2 = Unit 2 ...). 


2. After opening the proper drive, select L from the main menu to display 
the options for choosing a label. You have the option of editing the 
current label in the kernel (which would start out to be all 0’s), or getting 
the disk geometry for the label from the disk through a mode sense 
command. If you choose to get the disk geometry from the disk and it 
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fails, re-issue the L command and select 0 from the list (edit current label) 
and then enter the configuration of the drive. The Gapl and Gap2 sizes 
will always be zero for SCSI devices. Refer to the drive manufacturer’s 
manual for further details. 

3. Press the return key to advance to the partition information. A partition 
table similar to the one shown below will be displayed on the screen. 



Rimfire 

3 5 XX cs35ut 

Part it ion 

Table 



Starting 

Ending 

Size 


Partition 

Cylinder 

Cylinder 

Blocks 

Mbytes 

Overlaps 

a 

0 

77 

32994 

16 . 11 

c 

b 

78 

174 

41031 

20 . 03 

c 

c 

0 

1386 

586701 

286 . 48 

a b g h 

d 

0 

0 

0 

0.00 


e 

0 

0 

0 

0.00 


■C 

0 

0 

0 

0.00 


g 

175 

755 

245763 

120.00 

c 

h* 

756 

1386 

266913 

130.33 

c 

Disk 

Capacity : 286.48 

Total 

Cylinders : 

1387 


You will be prompted to enter the free-space hog partition (represented by 
the asterisk (*). A free-space hog partition is the partition that contains 
the remaining cylinders at the end of the disk that are not accounted for. 
The number of cylinders contained in this partition changes as other 
partitions are changed. Enter the partition letter, or n for no free hog, to 
the statement below: 

Enter the free-space hog partition [n<one>] : 

Next, enter this partition-to-change statement: 

Partition to change, <CR> when done: 

The partition that you selected will be displayed on the bottom of the 
screen with a statement requesting you to enter the starting cylinder as 
shown below. 


Partition a 

Enter the starting cylinder (0-1386, n<ext cylinder>, q<uit>) : 
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Next, you will be prompted for the size of the partition in Megabytes: 


Part. ion a 

Enter the size in megabytes (0-287, r<est of the disk>, q<uit>) : 

After entering the size of the partition, the number of blocks will be 
displayed along with the size in megabytes for the value entered. The 
actual size in megabytes may be slighdy larger as the partitions must start 
and end on cylinder boundaries. Enter the ’+’ or keys to add or 
subtract a cylinder to/from the partition. Enter ’y’ if the partition is as 
desired, and enter ’n’ to start over for that partition. 

Partition a 

32994 blocks (16.il Mbytes) OK (y/+/-/n) ? 

Repeat this procedure for each partition to change and enter <CR> when 
done. 


Partition to change, <CR> when done: 

Next, to write this partition table to the kernel, enter y. 

Enter ' y' to write this partition table to the kernel: 

4. If you need to change parameters for the selected label, select L from the 
main menu, select 0 (edit the current label), and then press Enter to 
display parameters for the current label. 


NOTE: Because most SCSI disk drives are pre -formatted, formatting 

and verifying drives may not be necessary. 


5. If you do NOT need to format your drive, enter a W (Write Disk Label) 
command from the main menu to write the disk label to the disk. 


Formatting and Verifying Drives 

If you need to format your drive, perform the steps in this section. 

1. Select the f (format the drive) command from the main menu. The format 
command will first prompt the user for information about reading the 
defect list. The user can format without the defect list, use only the 
manufactures defect list, use the grown defect list, or use both the 
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manufactures and grown defect list while formatting. Next the user will 
be prompted for an interleave value. In MOST cases the user should enter 
a 1 for the interleave value. Then the estimated time for the format is 
displayed giving the user a chance to back out of the format. If the user 
decides to proceed, a "Formatting:” message is displayed and when 
complete, the word "Done” will appear after "Formatting". 

2. Enter y to write the disk label to the disk. 

3. Select the v (verify format) command to verify the disk integrity. Ciprico 
suggests five passes of verification. A prompt appears asking whether 
cs35ut and the adapter should map bad blocks. Enter y to map bad blocks. 
Generally, the entire disk should be verified. Refer to the v command 
description in Appendix B for further details. 

4. Once the verify has completed, type q to exit the cs35ut program. The 
disk is ready to store data. 


Loading the SunOS 

1. Insen the first SunOS release tape into the tape drive. Type b xt( ) and 
press Enter to display the boot prompt (boot:). 

2. Perform the SunOS installation using SETUP (for SunOS3.X) or 
SUNINSTALL (for SunOS4.X). For funher details refer to the following 
section in your Sun manual: 

• If you are using SETUP , refer to the “Loading the Miniroot ” 
section. 

• If you are using SUNINSTALL, refer to the “Loading the Mini 
UNIX " section. 

Always refer to the Ciprico board as xy (for disk commands) or xt (for 
tape commands) during the installation. 

The system name assigned during the SunOS installation will be used as 
the Hostname when installing the Ciprico driver. 
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3. After completing the normal SunOS installation, reboot the system by 
entering b xy( ) at the monitor prompt. 


WARNING 

I If Sun 472 emulation is enabled, an attached 
| tape unit requires that a tape be loaded when 
booting. 


Installing the Ciprico Driver 

The Ciprico driver can be installed manually or by using the Installation Script 
that is included on the distribution tape. It is described in the remainder of this 
chapter. 

If you select to manually install the Ciprico driver, refer to Appendix G. 
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Using the Installation Script 

The Installation Script is included on Ciprico’s Utility and Installation Tape. It is 
an interactive utility that steps you through the procedures for installing the 
Ciprico driver. 


NOTE: In the following procedures, you are asked if it is OK to copy 

files to existing directories. To avoid overwriting existing 
files, filenames are automatically assigned a .nocf extension. 

Throughout the following procedures, there are messages 
indicating whether the particular step is mandatory to driver 
installation. Steps noted as mandatory must be performed 
for successful driver installation. 

Due to system variations, the information displayed on your 
screen (file names, software and hardware references, device 
counts, etc.) may differ from examples in this manual. 

If the install script is interrupted because of an error, you 
are given a series of choices of what to do next. If you want 
to re-enter the program, after making the appropriate 
changes, choose that option, make the changes, then enter fg 
to re-enter the program. 


1. Create a directory (called CIPRICO ) for the files on Ciprico’s Utility and 
Installation tape. Enter the following line: 

mkdir /sys/CIPRICO 

2. Enter the following command to change to the directory you just created: 

cd /sys/CIPRICO 

3. Insert the Ciprico Utility and Installation Tape. If you are using 1/4-inch 
tape connected to the Rimfire 3523 adapter, read the tape by entering the 
following command: 

tar xvbf 126 /dev/rmtO 
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If you axe using I/4-inch tape connected to a Sun internal drive, read the 
tape by entering this command: 

tar xvbf 126 /dev/rst8 

If your system uses a high-density tape drive, you can read the tape as 
/dev/rstO. 

4. Enter the following command to switch to the cf 7 install directory: 

cd cf/install 

5. Start the installation script by entering the following command: 

doinstall cf 


(C) COPYRIGHT 1989 

Ciprico, Inc. 

2 95*5 Xenium Lane 
Plymouth, MN 55441 
(612) 559-2034 

All Rights Reserved. 

+ Determining CPU architecture... CPU is a sunX 
+ Determining hostname... Hostname is Rimfire 
+ Checking for mount of /usr... /usr is mounted. 

+ Trying to find system files 
+ You are running SunOS release 4.X 

+ Your system configuration directory should be RIMFIRE 
+ System configuration file is /sys/sunX/conf /RIMFIRE 


** NOTE: The Hostname (indicated by RIMFIRE ) will be the system 

name assigned during SunOS installation. 


[The next step is mandatory for driver installation] 

About to copy cf device driver files to /sys/sundev and 
/sys/sunX/OBJ. OK? (y/n) y 
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6. Enter y to copy the cf device driver files to /sys/sundev and 
/usr/unclude/sundev. The following messages appear: 

+ cp . . /sundev/cs35 . c /sys /sundev/cs35 . c 

+ cp . . / sundev/cs35er r . h /sys/sundev/cs35err . h 

+ cp . . /sundev/cs35err . h /usr/include/sundev/cs35err . h 

+ cp . . /sundev/cs35f lp . h / sys / sundev/cs35f Ip . h 

+ cp . . /sundev/cs35f lp . h /usr/ include / sundev/cs35f lp . h 

+ cp . . /sundev/cs35if . h / sys / sundev/cs35if . h 

+ cp . . /sundev/cs35if . h /usr/ include/sundev/cs35if . h 

+ cp . . /sundev/cs35int . h / sys / sundev/cs35int . h 

+ cp . . /sundev/cs35int . h /usr/ include/sundev/cs35int . h 

+ cp . . /sundev/cs35io . h / sys/sundev/cs35io . h 

+ cp . . / sundev/cs35io . h /usr/ include/ sundev/cs35io . h 

+ cp . . /sundev/cs351ib . c /sys/sundev/cs351ib . c 

+ cp . . /sundev/cs35prm. h /sys/sundev/cs35prm. h 

+ cp . . /sundev/cs35prm. h /usr / include/ sundev/cs35prm . h 

+ Copy of cf driver files done. 

[The next step is mandatory for driver installation] 
About to modify /sys/sun/conf . c . OK? (y/n) y 

7. Enter y to modify the /sys/sun/conf.c file. The following lines appear: 

+ Beginning to add cf entries to /sys/sun/conf.c. 

+ Making backup copy of /sys/sun/conf.c as 
/ sys/sun/conf . c . nocf . 

+ Adding defines to /sys/sun/conf.c. 

+ Counting block device entries... 24 found. 

+ Counting character device entries... 71 found. 

+ Adding bdevsw entry to /sys/sun/conf.c. 

+ Adding cdevsw entry to /sys/sun/conf.c. 

+ Checking for new entries in /sys/sun/conf.c. 

+ Successful cf device description addition to 
/sys/sun/conf . c 

[The next step is mandatory for driver installation] 
About to modify /sys/sunX/conf /files . OK? (y/n) y 
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8. Enter y to modify the /sys/sunX/conf/files file. The modifications will be 
made and a backup copy (files.nocf) will be written. The following lines 
appear: 

+ Beginning to add cf entries to /sys/sunX/conf / files . 

+ Making backup copy of /sys/sunX/conf/files as 
/sys/sunX/conf/files . nocf . 

+ Adding configuration lines to /sys/sunX/conf/files. 

+ Checking for new entries in /sys/sunX/conf/files. 

+ Successful cf device addition to /sys/sunX/conf/files 

[The next step is mandatory for driver installation] 

About to ‘modify / sys/sunX/conf /RIMFIRE . OK? (y/n) y 

9. Enter y to modifiy /sys/sunX/conf/RIMFIRE. A backup copy 
(/sys/sunX/conf/RIMFIRE.nocf) will be made. The following lines 
appear: 

+ Making backup copy of /sys/sunX/conf/RIMFIRE as 
/sys/ sunX/ conf /RIMFIRE . nodf . 

+ Extracting controller information from 
/sys/sunX/conf/RIMFIRE. . .done. 

+ No cfc controllers currently installed. 

+ Adding controller cfcO to /sys/sunX/conf /RIMFIRE 

[Note: Controller address MUST NOT be the same or overlap] 
[any existing devices specified in file 
/sys/sunX/conf/RIMFIRE. ] 

[Default value is displayed in braces below] 

[Please be sure to preface hexidecimal number with "Ox" ] 

10. Enter the address of the Rimfire 35XX adapter and hit the return key, or 
just enter the return key if the address of the adapter is 0x5000. Then 
enter the interrupt vector of the controller, or just hit the return key if the 
interrupt vector OxFE is ok. 

VME address of controller? [0x5000] 

VME interrupt vector of controller? [OxFE] 

Add controller cfcO at address 0x5000 vector OxFE to 
/sys/sunX/conf/RIMFIRE? (y/n) y 
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11. Enter y to confirm your selection of the adapter address and interrupt 
vector. The following lines appear: 

+ Successful cfc device addition to / sys/ sunX/conf / RIMF IRE 

[The next step is mandatory for driver installation] 

About to modify / sys/ sunX/conf /RIMFIRE for device addition. 
OK? (y/n) y 

12. Enter y to add the devices to the /sys/sunX/conf/RIMFIRE file. The 
following lines appear: 

+ Backup copy of /sys/sunX/conf/RIMFIRE already exists. 

+ Extracting controller information from 
/sys/sunX/conf/RIMFIRE. . .done. 

+ No devices attached to controller cf cO . 

+ Extracting device information from 
/sys/sunX/conf/RIMFIRE. . .done. 

+ No cf devices configured in system. 

Configure device cfO at controller cfcO? (y/n) y 

13. If you enter y, the following type of menu appears: 

1 . Archive QIC Tape Drive 

2 . Exabyte Tape Drive 

3. Fujitsu Asyncronous Disk Drive 

4. Generic Disk Drive 

5. Generic Tape Drive 

6. HP Asyncronous Disk Drive 

7 . HP Syncronous Disk Drive 

8. Kennedy 9612 Tape Drive 

9. Maxtor Asyncronous Disk Drive 

10. Maxtor Syncronous Disk Drive 

11. Micropolis Asyncronous Disk Drive 

12 . Micropolis Syncronous Disk Drive 

13. Miniscribe Asyncronous Disk Drive 

14. Patriot Tape Drive 

15. Quantum Disk Drive 

16. Wangtek QIC Tape Drive 

17. Wren Asynchronous Disk Drive 

18. Wren Synchronous Disk Drive 
Device type = 


2-22 


Rimfire 3500 Installation Guide 




Section 2 - Bootable Adapter Installation 


Enter the device type from the menu above. For example, we will 
configure a system for a Maxtor Synchronous Disk drive. The first device 
type would be 10. 

SCSI Target ID of device (0-6) = 0 

Enter the SCSI target ID of the device being configured. 

Logical Unit Number of device (0-7 or 0 if none) = 0 

Enter the SCSI Logical Unit Number of device. 


Configure device cfl at controller cfcO? (y/n) n 

Enter y to this question, then go on to select the device type for cfl , or 
enter n if you won’t be configuring this device. 

Done configuring cf units? (y/n) n 

Enter y if you are done configuring devices, otherwise enter n to repeat the 
configuring steps for additional devices. When you enter y; the following 
messages appear: 

+ Successful addition of cf device (s) to 
/ sys / sunX/conf /RIMFIRE 

[Next step required ONLY for Ciprico RF3523 boards in boot 
emulation mode] 

[Should NOT be performed when installing any other 
cont rollers ] 

Removing xy entry from /sys/sunX/conf /RIMFIRE . OK? (y/n) y 

14. Enter y to remove the xy entry from /sys/sunX/conf/RIMFIRE. When you 
enter y, the following lines appear: 

Remove entries for device xyc0 at csr address 0xee40 ? 

(y/n) y 
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15. Enter y to confirm that you want to remove xyc0 at address 0xee40 from 
the sun config file. The following lines appear: 

+ Successful removal of xycO from RIMFIRE 
+ Making backup copy of fstab as fstab. nors. 

CURRENT fstab FILE 

/dev/xyOa / 4.2 rw, nosuid 1 1 
/dev/xyOg /usr 4 . 2 rw 1 2 
/dev/xyOh /home 4.2 rw 1 3 
/dev/xyOf /export/exec 4 . 2 rw 1 4 
/dev/xyOd /export /root 4.2 rw 1 5 
/dev/xyOe /export/swap 4.2 rw 1 6 

Change mounting for disk xyO in fstab to be on the Ciprico 
disk ( rs ) ? ( y/n ) y 

16. Enter y to change the xy entries in fstab to rs for the so that the rs disks are 
mounted during boot. The following lines appear: 

+ Successful edit of fstab 

[Next step required ONLY for Ciprico RF3523 boards in the 
boot emulation]” 

[mode and Should NOT be performed when installing any other 
controllers ] " 

[NOTE: If you are planning to use a xt 472 tape 

controller, answer no]” 

[to the following question and install the JTL disable 
jumper.]” 

Removing xt entry from RIMFIRE. OK? (y/n) y 


2-24 


Rimfire 3500 Installation Guide 




Section 2 - Bootable Adapter Installation 


17. Enter y to remove the xt entry from /sys/sunX/conf/RIMFIRE. The 
following lines appear: 


Remove entries for device xtcO at csr address 0xee60 ? 

(y/n) y 

+ Successful removal of xtcO from RIMFIRE 

+ Checking /sys/sunX/conf/RIMFIRE for root file system 
specification . 

+ Checking /sys/sunX/conf/RIMFIRE for swap file system 
specification . 

+ Root file system currently specified as: xyO 

+ Primary swap file system currently specified as: xyO 

[Next step is required ONLY for Ciprico RF3523 boards in 
the boot] 

[emulation mode with the $dev disks as root or swap disks 
AND you] 

[are not using root generic and swap generic] 

Editing config file to change root and swap specifications. 
OK? (y/n) y 


NOTE: If you are installing the Rimftre 3523 adapter with Drive 0 

as the primary disk, you will need to change the root and 
swap specifications in the config file. 


18. Enter y to proceed with specifying the root and swap devices. The 
following lines appear: 

+ Making temporary backup copy of /sys/sunX/conf/RIMFIRE 
Root disk is currently: xyO . Change? (y/n) y 

19. Enter y to change the root disk. The following type of selections appear: 

1. generic 2. rfO 3. rfl 4. rf2 

5. rf 3 6. rf 4 7. rf5 8. rf6 

9. r f 7 10. cfO 

Select "generic” for determining the root device at 
boot time. 

Enter the number of the disk that contains the root 
filesystem. (1/2/3/4/5/6/7/8/9/10) 10 
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20. Enter the number corresponding to c/0 to specify c/0 as the root disk. 

The following message appears: 

Root disk, is now: cfO. OK? (y/n)y 

Swap specification is currently: xyO . Change? (y/n)y 

21. Enter v to change the swap disk. The following type of selections appear: 

1. generic 2. rfO 3. rfl 4. rf2 

5. rf 3 6. rf 4 7. rf5 8. rf6 

9. rf 7 10. cfO 

Select "generic” for determining the primary swap device at 
boot time. 


You may specify ONLY ONE primary swap device in SunOS 4.X. 

Enter the number of the disk, to be used as the primary swap 
device. (1/2/3/4/5/6/7/8/9/10) 

22. Enter the number corresponding to c/0 to specify c/0 as the swap disk. 
The following message appears: 

Swap specification is now: cfO. OK? (y/n)y 

Enter y to confirm your selection for the swap device. 

+ Successful edit of root and swap specification in 
/sys/sunX/conf /RIMFIRE. 

[The next step is mandatory for driver installation] 

About to modify /sys/sunX/conf /devices . OK? (y/n) y 

23. Enter y to modify the /sys/sunX/conf/devices file and create a backup file 
called /sys/sunX/devices.nocf. The following text appears: 

+ Beginning to add cf entry to /sys/sunX/conf/devices. 

+ Making backup copy of /sys/sunX/conf/devices as 
/sys/sunX/conf/devices .nocf . 

+ Adding line to /sys/sunX/conf/devices. 

+ Checking for new entry in /sys/sunX/conf/devices. 

+ Successful cf device addition to / sys/sunX/conf/devices 

[The next step is required if cf disks are to be root or 
swap disks] 
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[Although not required in other cases, it is still strongly 
recommended] 

About to modify /sys/sun/ swapgeneric . c . OK? (y/n) y 

24. Enter y to modify the /sys/sun/swapgeneric.c file and create a backup file 
called /sys/sun/swapgeneric.c.nocf. The following information appears: 

+ Beginning to add cf entries to / sys/sun/swapgeneric . c . 

+ Making backup copy of /sys/sun/swapgeneric.c as 
/sys/sun/ swapgeneric . c . nocf . 

+ Adding defines to /sys/sun/swapgeneric.c. 

+ Checking for new entries in /sys/sun/swapgeneric.c. 

+ Successful cf device description addition to 
/ sys/sun/swapgeneric . c 

[Next step is optional, but strongly recommended] 

About to make and run cs35mk. OK? (y/n) y 

25. Enter y to make and run the cs35mk file to create the nodes. The 
following information appears: 

+ cd . . /cs35makedev 
+ make DFLAGS=-DSunOS4 install 
Installing cs35mk in /etc 
+ ./cs35mk y /dev 24 71 

[Next step is optional, but strongly recommended] 

About to make and install cs35ut. OK? (y/n) y 

26 . Enter >> to compile cs35ut.c. The following text appears: 

+ cd . . /cs35util 
+ make DFLAGS=-DSunOS4 install 
Installing cs35ut in /etc 

[The next step can be done later, but is recommended to do 
now] 

Run the config program on RIMFIRE? (y/n) y 
+ cd /sys/sunX/conf 
+ config RIMFIRE 
Doing a "make depend” 
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[The next step can be done later, but it is recommended to 
do it now] 

Run the make program to build a new vmunix? (y/n) y 

27. Enter y to run the make program. This will build a new vmunix kernel. 
The following text appears: 

+ cd /sys/sunX/RIMFIRE 
+ make 

Lines similar to the following will appear during the building process: 

cc -Sparc -c -0 -DsunX -DRIMFIRE -DSUN4_260 -DCRYPT 
-DTCPDEBUG -DIPCSHMEM -DIPCSEMAPHORE -DIPCMESSAGE -DSYSACCT 
-DLOFS -DNFSSERVER -DNFSCLIENT -DUFS -DQUOTA -DINET 
-DKERNEL -I. -I.. -I../.. . . / . . /os /uipc__proto . c 

loading vmunix 

rearranging symbols 

text data bss dec hex 

802816 119496 111000 1033312 fc460 

[The next step can be done later] 

Save old vmunix and copy /sys/sunX/RIMFIRE/ vmunix to 
/vmunix? (y/n) y 

28. Enter y to save the old vmunix and copy /sys/sunX/RIMFIRE/vmunix to 
/vmunix. The following lines appear: 

+ cp /vmunix / vmunix. nocf 
+ cp /sys/sunX/RIMFIRE/vmunix /vmunix 
[The next step can be done later] 

Reboot the system? (y/n) n 

29. Enter y to exit the installation script and reboot the system. A message 
appears indicating the system is shutting down. 
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Adding Adapters to the System 

The installation script adds only one adapter, and the devices for it, to the Sun 
system configuration file. For information about installing additional adapters 
and drives, refer to Appendix G. 


Making Filesystems 

You will need to make filesystems on all newly created partitions. Newly created 
partitions include the following partitions: 

• All partitions created during installation of the Ciprico driver (manually or 
with the installation script). 

• All partitions created during installation of additional adapters and drives. 

Make file systems only on newly created partitions by entering the following 
command for each partition you created: 

newfs -n /dev/rrs ab 

In the foregoing example, a represents the chosen drive (0, 1, 2, or 3) and b 
represents the chosen partition (a, d, e, f, g, or h). 


NOTE: Do not make a filesystem on the swap partition (b) or on the 

master partition (c), which includes all other partitions. 
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This section describes procedures for installing Rimfire 3500 non-bootable 
hardware and software in a Sun Microsystems workstation. The information 
may vary between Sun Workstations and versions of SunOS. 

This section contains references and file names (for example sunX or 4X) that 
depend on the Sun system and version of SunOS you are using. When X is used, 
it should be replaced by the version number for your software or hardware. 

In addition, examples in this section include values and file names that may differ 
from those displayed on your screen, due to variations in system configuration. 

In this section, bold type indicates system-dependent variables. 
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Hardware Installation 

This section describes installation of a Rimfire 3500 VMEbus SCSI Host Bus 
Adapter (HBA) in Sun Microsystems’ workstations. Installation procedures are 
dependent on the model of Sun workstation. 

Required Equipment: 

• Sun 3 or Sun 4 Workstation 

• Rimfire 3500 VMEbus SCSI Host Bus Adapter 

To perform hardware installation, UNIX must be shut down and the Sun system 
powered off. As an added precaution, disconnect the power cord from the system. 


Board Configuration 

Figures 3- 1 through 3-3 illustrate jumper locations and their factory settings. 
Unless otherwise indicated, a jumper is set to 0 if the jumper is in and is set to / 
if the jumper is out. Inspect your Rimfire 3500 adapter for proper jumper settings. 


NOTE: The first Rimfire adapter in your system should be jumpered 

for a Board Address of 0x5000. Rimfire 3500 adapters 
ordered as “Sun Specials” are already jumpered for this 
address. If a second Rimfire adapter is installed, the Board 
Address jumpers on the second adapter must be reconfigured 
for an address of 0x5500. 

If the Rimfire 3523 adapter is not being used for booting, 
jumpers JD4L, JD7L, and JTL on the Rimfire 3523 adapter 
should have disable jumpers installed (see pages 2-3 and 
2-4). 
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Adapter installation 

1. VME card slots on the Sun workstation are covered by metal plates. 

Select an unused slot and remove the two hex head screws holding the 
cover plate on the rear of the system. Remove the cover plate and slide 
the EMI plate out of the slot. 

2. Fit the Rimfire 3500 adapter into the adapter frame and connect the cables. 

3. Insert the Rimfire 3500 adapter and adapter frame into the slot. Press the 
adapter and adapter frame firmly into the connectors. 


NOTE: Do not install a Rimfire 3517/3518 in slots 1 through 7 

unless you use an adapter frame that isolates the P2A and C 
row signals. 


4. Fasten the adapter into place with the hex head screws from the rear cover 
plate. 

5. Remove the front cover plate from the workstation to allow access to the 
backplane. On some Sun Workstations, you will also need to move the 
power supply to access the backplane. If so, remove the four screws 
holding the power supply cover and tilt open the power supply. Others 
may have a small removable panel allowing access to just the jumper area 
of the backplane. 
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6. Locate the slot being used. (The number is to the right of the connector.) 
Remove the BUS GRANT 3 and IACK jumpers (it is a good idea to simply 
move the jumpers down one pin so they are available, if needed). Figure 
3-4 illustrates the BUS GRANT and IACK jumpers for a given slot. 


Deskside & Rack Mounted Systems 
Desktop Systems 

BG1 
BG2 
BG3 

Remove 

IACK 


Remove 

/\ 



• • 


BG0 BG1 BG2 BG3 


IACK 


Figure 3-4 BUS GRANT and IACK Jumpers 


NOTE: The BUS GRANT 3 and IACK jumpers must be removed for 

the Rimfire 3500 adapter to operate properly. 


7. If you moved the power supply to access the backplane, tilt the power 
supply back to its original position and refasten the power supply cover. 

8c Replace the front cover plate (if there is one on you particular system). 
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9. Connect the drive cables. Figure 3-5 illustrates proper cable connections. 

J2 - Floppy Disk Cable 
J1 - SCSI Cable 

Figure 3-5 Cable Connections 


10. Check the drives to ensure that drive parameters (addressing, terminators, 
sector switches, etc.) are correct. Consult your Drive Manufacturer’s 
manual for recommended drive settings. 

11. Power on the new drive(s) and wait until they are ready for operation. 

12. Power the Sun system on and check for proper operation. If the board is 
operating correctly, the Fail and Busy lights will flash on and then turn off. 
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Software Installation 

Before beginning this, or any other software installation procedure, be sure to 
have a CURRENT backup of the system files. Make a backup copy of the current 
vmunix kernel as well. 

References: 

• Sun Microsystem’s documentation and reference manuals for the 
appropriate Sun Workstation. 

• The appropriate drive manufacturer’s reference manual. 

Required Equipment: 

• Sun 3 or Sun 4 Workstation with a tape drive (1/4 inch or 1/2 inch) 

• Rimfire 3500 VMEbus SCSI host bus adapter (with adapter frame) 

- A copy of the latest version of the Rimfire 3500 SunOS driver on 1/4 inch 
or 1/2 inch tape. 

• Text editing software (Installation procedures in this document assume 
you are using UNIX’s vz editor). 


BEFORE PROCEEDING 

If you are installing your driver manually, refer to 
Appendix® for installation procedures. If you are using 
the installation script; continue with Ms chapter. 
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installing the Ciprico Driver 

The Ciprico driver can be installed manually or by using the Installation Script 
that is included on the distribution tape. If you select to manually install the 
Ciprico driver, refer to Appendix G. 


Using the Installation Script 

The Installation Script is included on Ciprico’s Utility and Installation Tape. It is 
an interactive utility that steps you through the procedures for installing the 
Ciprico driver. 


*+ NOTE: In the following procedures, you are asked if it is OK to copy 

files to existing directories. To avoid overwriting existing 
files, filenames are automatically assigned a .nocf extension. 

Throughout the following procedures, there are messages 
indicating whether the particular step is mandatory to driver 
installation. Steps noted as mandatory must be performed 
for successful driver installation. 

Due to system variations, the information displayed on your 
screen (file names, software and hardware references, device 
counts, etc.) may differ from examples in this manual. 

If the install script is interrupted because of an error, you 
are given a series of choices of what to do next. If you want 
to re-enter the program, after making the appropriate 
changes, choose that option, make the changes, then enter fg 
to re-enter the program. 


1. Create a directory (called CIPRICO ) for the files on Ciprico’s Utility and 
Installation tape. Enter the following line: 

mkdir /sys/CIPRICO 

2. Enter the following command to change to the directory you just created: 

cd /sys/CIPRICO 

3. Insert the Ciprico Utility and Installation Tape. If you are using 1/4 inch 
tape, read the tape by entering the following command: 

tar xvbf 126 /dev/rst8 
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If your system uses a high-density tape drive, you can read the tape as 
/dev/rstO. 

4. Enter the following command to switch to the cfUnstall directory: 

cd cf/install 

5. Start the installation script by entering the following command: 

deinstall cf 

The following information appears: 

(C) COPYRIGHT 1989 


Ciprico, Inc. 

2955 Xenium Lane 
Plymouth, MN 55441 
(612) 559-2034 
All Rights Reserved. 

+ Determining CPU architecture... CPU is a sunX 
+ Determining hostname... Hostname is Rimfire 
+ Checking for mount of /usr f . . /usr is mounted. 

+ Trying to find system files 
+ You are running SunOS release 4.X 

+ Your system configuration directory should be RIMFIRE 
+ System configuration file is /sys/sunX/conf /RIMFIRE 


^ NOTE: The Hostname (indicated by RIMFIRE ) will be the system 

name assigned during SunOS installation. 


[The next step is mandatory for driver installation] 

About to copy cf device driver files to /sys/sundev and 
/sys/sunX/OBJ. OK? (y/n) y 
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6. Enter y to copy the cf device driver files to /sys/sundev and 
/usr/unclude/sundev. The following messages appear: 


+ cp . . /sundev/cs35 . c /sys/sundev/cs35 . c 

+ cp . . /sundev/cs35err . h /sys/sundev/cs35err . h 

+ cp . . /sundev/cs35err . h /usr/ include /sundev/cs35err . h 

+ cp . . /sundev/cs35f lp . h /sys/sundev/cs35f lp . h 

+ cp . . / sundev/cs35f lp . h /usr / include/sundev/cs35f Ip . h 

+ cp . . /sundev/cs35if . h / sys / sundev/cs35if . h 

+ cp . . /sundev/cs35if . h /usr/ include/ sundev/cs35if . h 

+ cp . . /sundev/cs35int . h /sys/sundev/cs35int . h 

+ cp . . /sundev/cs35int . h /usr / include/ sundev/cs35int . h 

+ cp . . /sundev/cs35io . h /sys/sundev/cs35io . h 

+ cp . . /sundev/cs35io . h /usr/ include/ sundev/cs35io . h 

+ cp . . /sundev/cs351ib . c /sys/sundev/cs351ib . c 

+ cp . . /sundev/cs35prm. h /sys/sundev/cs35prm. h 

+ cp . . /sundev/cs35prm. h /usr/include/sundev/cs35prm. h 

+ Copy of cf driver files done. 

[The next step is mandatory for driver installation] 
About to modify /sys/sun/conf . c . OK? (y/n) y 

7. Enter y to modify the /sys/sun/conf. c file. The following lines appear: 


+ Beginning to add cf entries to /sys/sun/conf . c . 

+ Making backup copy of /sys/sun/conf . c as 
/sys/sun/conf . c . nocf . 

+ Adding defines to /sys/sun/conf . c . 

+ Counting block device entries... 24 found. 

+ Counting character device entries... 71 found. 

+ Adding bdevsw entry to /sys/sun/conf . c . 

+ Adding cdevsw entry to /sys/sun/conf . c . 

+ Checking for new entries in /sys/sun/conf . c . 

-i- Successful cf device description addition to 
/sys/sun/conf .c 

[The next step is mandatory for driver installation] 
About to modify /sys/sunX/conf /files . OK? (y/n) y 
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8. Enter y to modify the /sys/sunX/conf/files file. The modifications will be 
made and a backup copy (files. nocf) will be written. The following lines 
appear: 

+ Beginning to add cf entries to /sys/sunX/conf/files. 

+ Making backup copy of /sys/sunX/conf/files as 
/sys/sunX/conf/files . nocf . 

+ Adding configuration lines to /sys/sunX/conf/files. 

4- Checking for new entries in /sys/sunX/conf/files. 

+ Successful cf device addition to /sys/sunX/conf/files 

[The next step is mandatory for driver installation] 

About to modify /sys/sunX/conf /RIMFIRE . OK? (y/n) y 

9. Enter y to modify /sys/sunX/conf/RIMFIRE. A backup copy 
(/sys/sunX/conf/RIMFIRE. nocf) will be made. The following lines 
appear: 

4 - Making backup copy of /sys/sunX/conf/RIMFIRE as 
/sys/ sunX/ con f /RIMFIRE . nocf . 

4 - Extracting controller information from 
/sys/sunX/conf/RIMFIRE. . .done. 

4- No cfc controllers currently installed. 

4 - Adding controller cfcO to /sys/sunX/conf/RIMFIRE 

[Note: Controller address MUST NOT be the same or overlap] 
[any existing devices specified in file 
/sys/sunX/conf/RIMFIRE. ] 

[Default value is displayed in braces below] 

[Please be sure to preface hexidecimal number with "Ox” ] 

10. Enter the address of the Rimfire 35XX adapter and hit the return key, or 
just enter the return key if the address of the adapter is 0x5000. Then 
enter the interrupt vector of the controller, or just hit the return key if the 
interrupt vector OxFE is ok. 

VME address of controller? [0x5000] 

VME interrupt vector of controller? [OxFE] 

Add controller cfcO at address 0x5000 vector OxFE to 
/sys/sunX/conf/RIMFIRE? (y/n) y 
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11. Enter y to confirm your selection of the adapter address and interrupt 
vector. The following lines appear: 

+ .Successful cfc device addition to /sys /sunX/conf /RIMFIRE 

[The next step is mandatory for driver installation] 

About to modify /sys/sunX/conf /RIMFIRE for device addition. 
OK? (y/n) y 

12. Enter v to add the devices to the /sys/sunX/conf/RIMFIRE file. The 
following lines appear: 

+ Backup copy of /sys/sunX/conf/RIMFIRE already exists. 

+ Extracting controller information from 
/sys/sunX/conf /RIMFIRE . . .done. 

+ No devices attached to controller cfcO . 

+ Extracting device information from 
/sys/sunX/conf/RIMFIRE. . .done. 

+ No cf devices configured in system. 

Configure device cfO at controller cfcO? (y/n) y 

13. If you enter y, the following type of menu appears: 

1 . Archive QIC Tape Drive 

2. Exabyte Tape Drive 

3. Fujitsu Asyncronous Disk Drive 

4 . Generic Disk Drive 

5. Generic Tape Drive 

6 . HP Asyncronous Disk Drive 

7 . HP Syncronous Disk Drive 

8. Kennedy 9612 Tape Drive 

9. Maxtor Asyncronous Disk Drive 

10. Maxtor Syncronous Disk Drive 

11. Micropolis Asyncronous Disk Drive 

12 . Micropolis Syncronous Disk Drive 

13. Miniscribe Asyncronous Disk Drive 

14. Patriot Tape Drive 

15. Quantum Disk Drive 

16. Wangtek QIC Tape Drive 

17. Wren Asynchronous Disk Drive 

18. Wren Synchronous Disk Drive 
Device type = 
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Enter the device type from the menu above. For example, we will 
configure a system for a Maxtor Synchronous Disk drive. The first device 
type would be 10. 

SCSI Target ID of device (0-6) = 

Enter the SCSI target ED of the device being configured. 

Logical Unit Number of device (0-7 or 0 if none) = 0 

Enter the SCSI Logical Unit Number of device. 

Configure device cfl at controller cfcO? (y/n) 

Enter y if you will configure this device, then go on to select the device 
type for cfl, or enter n if you won’t be configuring this device. 

Done configuring cf units? (y/n) 

Enter y if you are done configuring devices. To repeat the configuring 
steps for additional devices, enter n. When you enter y, the following 
messages appear: 

+ Successful addition of cf device (s) to 
/ sys / sunX/conf /RIMFIRE 


NOTE: Devices can be added . Refer to Appendix l for details. 


[Next step required ONLY for Ciprico RF3523 boards in boot 
emulation mode] 

[Should NOT be performed when installing any other 
controllers ] 

Removing xy entry from RIMFIRE. OK? (y/n) n 
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14. Enter n to keep the xy entry in /sys/sunX/conf/RIMFIRE. Removing the 
xy entry should be performed only for installing bootable disks. The 
following lines appear: 

+ Skipping removal of xy entry from / sys / sunX/conf / R IMF IRE . 

+ Making backup copy of fstab as fstab.nors. 

********★★★*★★★**★ 

CURRENT fstab FILE 

/dev/xyOa / 4.2 rw, nosuid 1 1 
/dev/xyOg /usr 4 . 2 rw 1 2 
/dev/xyOh /home 4.2 rw 1 3 
/dev/xyOf /export /exec 4.2 rw 1 4 
/dev/xyOd /export/root 4 . 2 rw 1 5 
/dev/xyOe /export /swap 4.2 rw 1 6 

Change mounting for disk xyO in fstab to.be on the Ciprico 
disk (rs) ? (y/n) n 

15. Enter n to keep the xy entries in /etc/fstab. Replacing the xy entries with 
rs entries should only be performed for installing bootable disks. The 
following lines appear: 

[Next step required ONLY for Ciprico RF3523 boards in the 
boot emulation]” 

[mode and Should NOT be performed when installing any other 
controllers ] ” 

[NOTE: If you are planning to use a xt 472 tape 

controller, answer no]” 

[to the following question and install the JTL disable 
jumper . ] ” 

Removing xt entry from RIMFIRE. OK? (y/n) n 
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16. Enter n to keep the xt entry in /sys/sunX/conf/RIMFIRE. Removing the 
xt entry should only be performed for installing bootable disks. The 
following lines appear: 

+ Skipping removal of xt entry from /sys/sunX/conf /RIMFIRE . 

+ Checking /sys/sunX/conf/RIMFIRE for root file system 
specification . 

4- Checking /sys/sunX/conf /RIMFIRE for swap file system 
specification . 

4- Root file system currently specified as: xyO 

4- Primary swap file system currently specified as: xyO 

[Next step is required ONLY for Ciprico RF3523 boards in 
the boot] 

[emulation mode with the $dev disks as root or swap disks 
AND you] 

[are not using root generic and swap generic] 

Editing config file to change root and swap specif icat ions . 
OK? (y/n) n 

17. Enter n to leave the root and swap specifications as they are. The 
following lines appear: 

4- Skipping specification of root and swap disks in 
/sys/sunX/conf/RIMFIRE. 

[The next step is mandatory for driver installation] 

About to modify /sys/sunX/conf /devices . OK? (y/n) y 

18. Enter y to modify the /sys/sunX/conf/devices file and create a backup file 
called /sys/sunX/devices.nocf. The following text appears: 


4- Beginning to add cf entry to /sys/sunX/conf/devices . 

+ Making backup copy of / sys / sunX/conf /devices as 
/sys/sunX/conf/devices . nocf . 
t Adding line to /sys/sunX/conf/devices. 

4 Checking for new entry in /sys/sunX/conf/devices. 

4 Successful cf device addition to /sys/sunX/conf/devices 

[The next step is required if cf disks are to be root or 
swap disks] 

[Although not required in other cases, it is still strongly 
recommended] 

About to modify /sys/sun/swapgeneric . c . OK? (y/n) y 
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19. Enter y to modify the /sys/sun/swapgeneric.c file and create a backup file 
called /sys/sun/swapgeneric.c.nocf. The following information appears: 

+ Beginning to add cf entries to /sys/sun/swapgeneric.c . 

+ Making backup copy of /sys/sun/swapgeneric.c as 
/sys/sun/swapgeneric . c . nocf . 

+ Adding defines to /sys/sun/swapgeneric.c. 

+ Checking for new entries in /sys/sun/swapgeneric.c. 

+ Successful cf device description addition to 
/ sys/sun/swapgeneric . c 

[Next step is optional, but strongly recommended] 

About to make and run cs35mk. OK? (y/n) y 

20. Enter y to make and run the cs35mk file to create the nodes. The 
following information appears: 

+ cd . . /cs35makedev 
+ make DFLAGS=-DSunOS4 install 
Installing cs35mk in /etc 
+ ./cs35mk y /dev 24 71 

[Next step is optional, but strongly recommended] 

About to make and install cs35ut. OK? (y/n) y 

21. Enter y to compile cs35ut.c. The following text appears: 

+ cd . . /cs35util 
+ make DFLAGS=-DSunOS4 install 
Installing cs35ut in /etc 

[The next step can be done later, but is recommended to do 
now] 

Run the config program on RIMFIRE? (y/n) y 

22. Enter y to configure the RIMFIRE file. The following lines appear: 


+ cd /sys/sunX/conf 
+ config RIMFIRE 
Doing a "make depend” 

[The next step can be done later, but it is recommended to 
do it now] 

Run the make program to build a new vmunix? (y/n) y 
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23. Enter y to run the make program. This will build a new vmunix kernel. 
The following text appears: 

+ Cd /sys/sunX/RIMFIRE 
+ make 

Lines similar to the following will appear during the 
building process: 

cc -spare -c -0 -DsunX -DRIMFIRE -DSUN4__2 60 -DCRYPT 
-DTCPDEBUG -DIPCSHMEM -DIPCSEMAPHORE -DIPCMESSAGE -DSYSACCT 
-DLOFS -DNFS SERVER -DNFSCLIENT -DUFS -DQUOTA -DINET 
-DKERNEL -I. -I.. -I../.. . . / . . / os / uipc proto . c 

loading vmunix 
rearranging symbols 

text data bss dec hex 

802816 119496 111000 1033312 fc460 

[The next step can be done later] 

Save old vmunix and copy /sys /sunX/RIMFIRE/ vmunix to 
/vmunix? (y/n) y 

24. Enter y to save the old vmunix and copy /sys/sunX/RIMFIRE/vmunix to 
/vmunix. The following lines appear: 

+ cp /vmunix /vmunix. nocf 
+ cp /sys/sunX/RIMFIRE/vmunix /vmunix 

[The next step can be done later] 

Reboot the system? (y/n) n 


25. Enter y to exit the Installation Script and reboot the system. A message 
appears indicating the system is shutting down. 


Adding Adapters to the System 

The installation script adds only one adapter, and the devices for it, to the Sun 
system configuration file. For information about installing additional adapters 
and drives, refer to Appendix G. 
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Making Filesystems 

You will need to make filesystems on all newly created partitions. Newly created 
partitions include the following partitions: 

• All partitions created during installation of the Ciprico driver (manually or 
with the installation script). 

• All partitions created during installation of additional adapters and drives. 

Make file systems only on newly created partitions by entering the following 
command for each partition you created: 


newfs -n /dev/rrsaLb 

In the foregoing example, a represents the chosen drive (0, 1, 2, or 3) and b 
represents the chosen partition (a, d, e, f, g, or h). 


NOTE: Do not make a filesystem on the swap partition (b) or on the 

master partition ( c ), which includes all other partitions. 
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Physical 

Rim fire 35XX 

Rimfire 3523 
Electrical 

Capacity 

Transfer Rate 


Environmental 

Operating: 

Non-Operating: 

Bus Interface 
Device Interface 


Single slot, double height VME Eurocard form factor board (233mm 
x 160mm) 

Single-slot, triple-height, full-depth board (400mm x 366.66mm) 


Voltage: 4.75 Vdc to 5.25 Vdc 

Current: 4.0 A typical (at +5 Vdc) 

Up to eight SCSI devices 

Up to four floppy disk drives (with optional floppy disk interface) 


SCSI data rates to 2.0 Mbytes/second (asynchronous mode) or 5 
Mbytes/second (synchronous mode) 

Sustained VMEbus transfer rates at SCSI bus speeds for SCSI 
operations. Sustained VMEbus transfer rates at floppy data rates for 
floppy operations. Burst VMEbus transfer rates of up to 20 
Mbytes/second with minimum memory response time, or 30 
Mbytes/second using block mode transfer. 

Optional floppy disk port transfer rates of 250 or 500 Kbits/second 


Temperature: 

Air Row: 

Humidity: 

Elevation: 

Temperature: 

Humidity: 

Elevation: 


0 °C - +55 °C for SCSI only board 

+ 15 °C - +45 °C for floppy disk option 

200 linear feet per minute 

10% to 80% non-condensing 

0 feet to 10,000 feet 

.40 °C - 4-85 °C 

10% to 95% non-condensing 

40,000 feet maximum 


VMEbus standard (Revision C.l) 


ANSI X3.131 - 1986 for SCSI Interface 
ANSI X3.80 - 1981 for Roppy Disk Interface 
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The cs35ut program is a utility to work with the Rimfire 3500 host bus adapter 
driver. It is intended for use with the SunOS 3.X and 4.0 operating system on 
Sun Workstations. It supports commands for formatting, track and sector 
mapping, and various tape commands. It allows access to data structures the 
device driver uses for configuring and partitioning. 


cs35ut Commands 

Table B-l lists the cs35ut disk device commands: 

Table B-l cs35ut Disk Device Commands 


Code 

Command 

Code 

Command 

a 

Start Device 

0 

Open a New Device 

b 

Debug Control 

q 

Quit 

c 

Identify Controller 

r 

Read and Display Label 

d 

Read Capacity 

u 

Stop Device 

f 

Format drive 

V 

Verify Disk Format 

1 

Choose Label 

w 

Write Label to Disk 

m 

Map Sectors 
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Table B-2 lists the cs35ut tape device commands: 

Table B-2 cs35ut Tape Device Commands 


Code 

Command 

Code 

Command 

a 

Load Device 

q 

Quit 

b 

Debug Control 

r 

Rewind 

c 

Identify controller 

s 

Search Filemark 

d 

Read Capacity 

t 

Re tension Tape 

e 

Erase Tape 

u 

Unload Device 

n 


w 

Write Filemark 

o 

Open a New Device 


Table B-3 lists the cs35ut dummy device commands: 


Table B-3 cs35ut Dummy Device Commands 


Code 

Command 

b 

Debug control 

c 

Identify Controller 

o 

Open a Device 

q 

Quit 


The calling parameters for the cs35ut utility are: 
cs35ut 

cs35ut /dev/rrsOa 

cs35ut is the program name, and /dev/rrsOa is the device to be opened. The disk 
device name must contain a #X as the last two letter/number values of its name; # 
is the sun configuration number, and X is a letter representation of the partition to 
open (a=0, b=l, c=2, d=3, e=4, f=5, g=6, h=7). If the command line does not 
contain the device to open, the user is prompted for the device. 
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If the user enters a disk device, the menu for disk devices appears. 


Open Device: /dev/rrsOa 

cs35ut> 



Size: 16320 

Available Disk Commands: 

a Start Device 

o 

Open 

a new device 

b Debug control 

q 

Quit 


c Identify Controller 

r 

Read 

and Display Label 

d Read Capacity 

u 

Stop 

Device 

f Format Disk 

v 

Verify Disk Format 

1 Choose Label 

m Map Sectors 

w 

Write 

Label to Disk 


If the user enters a tape device, the menu for tape devices appears: 


Open Device: /dev/rrtl 

cs35ut 


Available Tape Commands: 
a Load Device 

b Debug control 

c Identify Controller 

d Read Capacity 

e Erase Tape 

n Mode select command 

o Open a new Device 


q Quit 

r Rewind 

s Search Filemark 

t Retension Tape 

u Unload Device 

w Write Filemark 


The user also can set up a dummy device (see Appendix G) in the system 
configuration so that the dummy device can be opened, allowing the user to issue . 
a small number of commands that only pertain to the adapter, not the SCSI 
devices. This type of menu appears: 


Open Device: /dev/rrd3 

cs35ut 

Available commands : 
b Debug control 

c Identify Controller 

o Open a device 

q Quit 
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Commands for All Device Types 

The commands described in this section are available for all device types. 


Start/Load Device (a) 

The start device command will issue the SCSI optional command that starts the 
device. What a "start device" command will actually do is device specific. For 
disk drives that support this command, this will usually cause the disk to spin up 
and return to the online state. For tape drives that support this command, this will 
usually cause the tape to be loaded and return to the online state. 


Debug Control (b) 

The debug control command gives the user the option of selecting from 0 to 
Oxffff for the debug value. With a value of 0, no debug messages will be 
displayed on the screen. As the debug value approaches Oxffff, more debug, 
messages will appear on the screen. 


Identify Controller (c) 

The Identify Controller command displays the firmware revision, the engineering 
revision, the firmware date, and determines whether a floppy controller exists on 
this board, as this information shows: 

Open Device: /dev/rrsOa' Size: 16320 

Last Command: Identify Controller 

cs35ut> 


FW Rev: 07 

Eng Rev: 57 

FW Date: Apr 14, 1989 

floppy controller present 
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Read Capacity (d) 

The Read Capacity command asks the user for the logical block address for the 
SCSI Read Capacity command, displays the last logical block, and the block 
length as the following information shows: 

Open Device: /dev/rrsOa Size: 16320 

Last Command: Read Capacity 

cs35ut> 


Dec Hex 

Last Logical block 285039 4396f 

Block Length 512 200 


NOTE: This is the last logical block, address, not the number of 

blocks on the unit. 


Open a New Device (o) 

The Open New Device command prompts the user for a new device. Only one 
device may be open at a time with the utility. Therefore, opening a new device 
closes a previously selected device. 


Quit 

The Quit command exits the cs35ut program and returns to the system prompt. 


Stop/Unioad Device (u) 

The Stop Device command issues the SCSI optional Stop Device command to the 
device. What the command does is device specific. With most disk devices, 
issuing this command will cause the disk to spin down. For most tape devices, 
the tape will be unloaded. 
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Commands for Disk Devices 

The commands described in this section are available for disk devices. 


Format (f) 

The Format command prompts the user for information about reading the defect 
list. The user can format without the defect list, use only the manufactures defect 
list, or use the grown defect list while formatting (if the device supports this 
feature). This type of information appears on the screen: 

Open Device: /dev/rrsOa Size: 16320 

Command: format 

cs35ut> 


Then, the user is prompted for an interleave value. If the value entered by the 
user is greater than the number of sectors/track, the user must enter another 
interleave value. The format tells the user that the adapter is formatting blocks 0 
to the last block, and gives him the option to abort the format command. Then, 
the user is informed that the format command is in process, and of the estimated 
time required to complete the format for that device. This type of information 
appears on the screen: 

Open Device: /dev/rrsOa Size: 16320 

Command: format 

cs35ut> 

Do you want to include the defect list in the format? y 
Enter choice of defect list from menu below: 

1 . Manufacturers defect list read from disk 

2. Grown defect list read from disk 

3 . Both the Manufacturers and the Grown list 

What interleave? 1 

Formatting blocks 0 to in approximately 15 minutes. 

Are you sure? 

Formatting : 
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When the format command is complete, the word "Done" appears after the word 
"Formatting:", the second line changes from "Command:" to "Last Command:" as 
this information shows: 

Open Device: /dev/rrsOa Size: 16320 

Last Command: format 

cs35ut 

Interleave value? Enter a 1 for this value unless you 
are certain that you want a different value: 

Formatting blocks 0 to . 

Are you sure? 


Formatting: Done. 


Choose Label (I) 

The Choose Label command allows the user to get the disk geometry information 
by issuing a SCSI mode sense command (get the geometry from the disk), or edit 
the current label. If the user chooses to get the geometry from the disk, and the 
mode sense command fails, the user should enter the L command to edit the 
current lable, changing the parameters as set in the device manual. The disk 
capacity is displayed as the user is prompted for the partition values. Consult the 
Sun manual for recommended partition sizes. This kind of information appears: 

Open Device: /dev/rrsOa Size: 16320 

Command: Choose Label 

cs35ut> 

Please enter your choice: 1 

0 - edit current label 

1 - Get disk geometry information from disk thru mode sense 


If the user selects number 1 (get geometry from disk), a SCSI mode sense 
command is issued to the device to get the geometry. The partitions appear, 
giving the user a chance to modify them. The user is asked to enter the free spcae 
hog partition. It is the partition that holds the remainder of the disk as the 
partition are selected. The user can enter n if he does not want the free space hog 
partition. 
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After he has changed the partitions and pressed the enter key, the following type 
of information appears: 


<Micropolis 1355 cyl 1022 alt 0 hd 8 sec 34 ape 0> 


Checksum in label is ok. 
Magic number in label is ok. 


# of alt/cylinder 0 
size of gapl 0 
size of gap2 0 
interleave factor 1 


# of data cylinders 1022 


# of alt cylinders 0 

# of heads 8 

# of sectors /track 34 

label location 0 

physical partition # 0 


starting ending size 


Partition 

cylinder 

cylinder 

blocks 

/ Mbytes 

Overlaps 

a 

0 

139 

29400 

/ 

15.05 

c 

b 

140 

419 

58800 

/ 

30.11 

c 

c 

0 

780 

164010 

/ 

83.97 

a b h 

d 

0 

0 

0 

/ 

0.00 


e 

0 

0 

0 

/ 

0.00 


f 

0 

0 

0 

/ 

0.00 


g* 

0 

0 

0 

/ 

0.00 


h 

420 

780 

75810 

/ 

38.81 

c 


Map Sectors (m) 

The Map Sectors command issues the SCSI Reassign Blocks command to the 
device. The user is prompted for a starting block to be mapped, and the number 
of blocks. This type of information appears: 

Open Device: /dev/rrsOa Size: 16320 

Command: Map Sectors 

cs35ut> 


'q' to quit 
Starting Block: 

Number of Blocks: 

Enter ' y' to map blocks through Yes 
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Read and Display Label (r) 

The Read Label command reads the label from the disk and displays the label. 
This type of information appears: 


<Micropolis 1355 cyl 1022 
Checksum in label is ok. 
Magic number in label is 


# of alt/cylinder 0 
size of gapl 0 
size of gap2 0 
interleave factor 1 


# of data cylinders 


alt 0 hd 8 sec 34 ape 0> 


# of alt cylinders 0 

# of heads 8 

# of sectors / track 34 

label location 0 

physical partition # 0 



start ing 

ending 

size 


Partition 

cylinder 

cylinder 

blocks 

/ Mbytes 

Overlaps 

a 

0 

139 

29400 / 

15.05 

c 

b 

140 

419 

58800 / 

30 . 11 

c 

c 

0 

780 

164010 / 

83.97 

a b h 

d 

0 

0 

0 / 

0.00 


e 

0 

0 

0 / 

0.00 


f 

0 

0 

0 / 

0.00 


g* 

0 

0 

0 / 

0.00 


h 

420 

780 

75810 / 

38.81 

c 

Disk 

Capacity : 

286.48 

Total 

Cylinders : 

1387 


Verify Disk Format (v) 

The Verify Disk Format command verifies the disk between the starting block and 
ending block entered by the user. The command allows the user to verify a single 
block many times, or the whole disk. It also allows the user to map bad sectors as 
they are discovered. 


NOTE: If your disk supports automatic block relocation, you need 

not run Verify to map bad sectors. 


This verify is read-only. It does not destroy data. The following type of 
information appears: 

Open Device: /dev/rrsOa Size: 16320 

Command: Verify disk 

cs35ut 
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How many passes do you want to make? 2 
OK, doing 2 verify passes. 

Do you want to map bad blocks as they are discovered? Yes 
Ready to verify disk, enter ' y' to proceed: Yes 

Then, this type of information appears: 

Open Device: /dev/rrsOa Size: 16320 

Command: Verify disk 

cs35ut> 


Enter ' y' to verify the whole disk: No 

Starting Block: 0 

Ending Block: 5000 

Verifying blocks 0 to 5000 
Are you sure? Yes 

Verifying: 

Block: 0 

As the verify command proceeds, the block currently being verified appears on 
the bottom line. When done verifying, the word "Done" appears after the word 
"Verifying", like this: 

Open Device: /dev/rrsOa Size: 16320 

Command: Verify disk 

cs35ut> 

Enter ' y' to verify the whole disk: No 

Starting Block: 0 

Ending Block: 5000 

Verifying blocks 0 to 5000 
Are you sure? Yes 

Verifying: Done 

Block: 5000 


Write Label to Disk (w) 

The write label command writes the current chosen label to the disk. 
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Commands for Tape devices 

The commands described in this section are avaliable for tape devices. 


Erase Tape (e) 

The Erase Tape command issues the SCSI Erase Tape command. What actually 
happens during an erase tape is device specific. Some devices will erase the 
remaining tape from the position that the tape is currently positioned, but some 
will start erasing from the beginning of tape. Since the erase can be time 
consuming once it is started, a warning message will be displayed giving the user 
a way to abort the command. 


Mode Sense/Select (n) 

The Mode Sense/Select command for tape selects the density used when writing 
to, or reading from, the tape. The density code can be determined by examining 
the tape drive manual. This type of infromation appears: 

Open Device: /dev/rrtl 

Command: Mode Sense/Seiect 

cs35ut> 


Number to change, when done: 


1. Speed code (hex) : 0 

2. Buffered flag ( 1 = buffered) : 1 

3. Density code (hex) : 0 

4. Block length (hex) : 200 


Number of blocks = 000000 


Rewind Device (r) 

The rewind tape command causes the tape to be rewound. There are no special 
features for this command. 
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Search Fiiemark (s) 

The Search Fiiemark command will prompt the user for the number of filemarks 
to search. Then the tape will be repositioned after the user entered count of 
filemarks on the tape. 


Retension Tape (t) 

The retension tape command will retension and load the currently opened tape 
device. 


Write Fiiemark (w) 

The write fiiemark command causes the tape drive to write a fiiemark on the tape. 
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Unit options defines specify operating parameters for the particular drive and are 
defined by “ORing” together the desired flag defines. Flag defines are stored in 
the / sys/sundev/cs35prm.h and cs35flp.h files, and created device defines are 
stored in cs35prm.h files. Table C- 1 lists the unit-option-flag defines for disk 
and tape drives. Table C-2 lists the request sense counts, and Table C- 3 lists the 
unit-option-flag defines for floppy drives. 


Table C-l Unit Options Flag Defines (Disk & Tape ) 


Flag Define 

Define Value 

Description 


0x000001 

Do not issue Read Capacity at open(). 

NOOPN_MDSEL 


Do not issue Mode Select at open(). 

ONEFILEMARK 

0x000004 

Tape drive can only write one filemark at a time. 

GEN_MODE 

0x000008 

Tape drive has modes of operation. Add this if you 
can only do certain commands (i.e.. Mode Select ) 
when the drive is in general mode, in contrast to 
read/write mode. 

NORESERVE 

0x000010 

Don’t do Reserve and Release commands. 

SYNCHRONOUS 

0x000080 

This drive is synchronous. 

LONGRDYWAIT 

0x000100 

This drive may take a while to pass Test Unit Ready 
commands. 

EXABYTE 

0x000200 

This is a flag to handle vendor unique parameters for 
the Exabyte tape drive. 

FIXEDBLK 

0x000400 

Force Fixed Block mode. 

REQLENLO 

0x000800 

Set the combination of REQLENLO and REQLENHI 
for the desired extended status size, (see Table C-2 
for REQUEST SENSE count.) 

REQLENHI 

0x001000 

NORETRYSOFT 

0x002000 

This specifies no retries on soft errors. An error will 
be printed to the screen. 

SORTCMB 

0x004000 

Enable Sort and Combine for this device. Tape 
devices should not use this feature. Your adapter 
must have firmware revision 9, or higher, for the 
3500, and non-beta firmware for the 35 10, to use this 
feature. 

NOREWIND 

0x008000 

This is a no rewind device for tapes. 

ONEFM 

0x10000 

This flag terminates tape with one EOF (like Sun), 
instead of two. Practice caution when using this flag. 
If it is desired to append files to the end of tape, it 
may be hard to determine were EOT is, as a filemark 
is also written between files. 


Rimfire 3500 Installation Guide 


C-1 


































Appendix C - Unit Options Defines 


Table C-2 Request Sense Count 


REQLENHI 

REQLENLO 

REQUEST SENSE COUNT 

0 

0 

8 

0 

1 

16 

1 

0 

24 

1 

1 

32 


Table C-3 Unit Options Flag Defines (Floppy) 


Flag Define 

Define Value 

Description 

FLM_200SSSD 

(0x05) 

8" (200 mm) SS/SD, 48 tpi 

FLM_200DSSD 

(0x6) 

8" (200 mm) DS/SD, 48 tpi 

FLM_200SSDD 

(0x9) 

8" (200 mm) SS/DD, 48 tpi 


(OxA) 

8" (200 mm) DS/DD, 48 tpi 

FLM_130SSSD48 

(OxD) 

5.25" (130 mm) SS/SD, 48 tpi 

FLM_ 1 30DSDD48 

(0x12) 

5.25” (130 mm) DS/DD, 48 tpi 

FLM_130DSDD96 

(0x16) 

5.25” (130 mm) DS/DD, 96 tpi 

FLM_ 1 30DSQD96 

(0x1 A) 

5.25" (130 mm) DS/QD, 96 tpi 

FLM_9()DSDD135 

(Ox IE) 

3.5" (90 mm) DS/DD, 135 tpi 

FLSSJ28 

(0) 

128 byte sectors 

FLSS_256 

(0x40) 

256 byte sectors 

FLSS_512 

(0x80) 

512 byte sectors 

IalHL<FtVa— 

(OxCO) 

1024 byte sectors 

E 

(0x100) 

2048 byte sectors 

FLSPT_5 

(5«10) 

5 sectors per track 

FLSPT_8 

(8«10) 

8 sectors per track 

FLSPT_9 

(9«10) 

9 sectors per track 

BaldJiilft— 

(10«10) 

10 sectors per track 

FLSPT_15 

( 15« 10) 

15 sectors per track 

ESSBSHHIi 

( 1 6« 10) 

16 sectors per track 


(18«10) 

18 sectors per track 


(3 1« 10) 

31 sectors per track 


The unit options defines are used in the unit opts field of the rfdinfo array to 
specify device information for the drives in your system. 

Procedures for specifying flag and unit options defines vary with the device 
installed (disk, tape, or floppy). 
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Disk Drive Defines 

The procedures for specifying defines for a disk drive are as follows: 

1. Enter the following command to access the cs35prm.h file with the vi 
editor: 

vi cs35int.h 

2. Using the vi editor, enter the define statement(s) for the disk drive. 
Specify drive characteristics by “ORing” together the appropriate Flag 
defines (listed in Table C-l). 

For example, suppose you add the following drive reference to the 
RIMFIRE file: 


#A SCSI Disk (Hathorpak) 

disk cf2 at cfcl drive 0 flags 0 

The reference specifies a synchronous drive that takes a while to pass 
“unit ready” test and should not issue " read capacity” at open. You 
would enter the following define statement in the cs35prm.h file: 

# define HATHORPAK (WD NORMAL i SYNCHRONOUS i NOOPN RDCAP ! LONGRDY) 


Rimfire 3500 Installation Guide 


C-3 




Appendix C - Unit Options Defines 


The following example illustrates the rfdinfo array in the cs 35 int.h file. 
The shaded portion of the array illustrates the added device- specific 
information for the defined disk drive. 


struct device word rfdinfo! ] = { 


/* device 

dev 

target 

logical 

unit 

Partition 

*/ 


/ * incex 

id 

id 

unit 

opts 

number */ 



{0, 

d:r_acc, 

5 , 

0, 

Micropolis, 

0}, 

/ * minor 

0 V 

(0, 

d:r_acc, 

5 , 

0, 

Micropolis, 

1 } , 

/* minor 

1 -/ 

{0, 

3 1 R_ACC , 

5 

0, 

Micropolis, 

2}, 

/* miner 

2 V 

{ 0 , 

d:r_acc, 

5 

0, 

Micropolis, 

3 }, 

/" minor 

3 * ' 


d:r_acc. 

5 , 

0, 

Micropolis, 

4 }, 

/* minor 

4 ■/ 

' 0 / 

d:r_acc, 

5 , 

0, 

Micropolis, 

5 }, 

/* minor 

5 V 

«;0, 

DIR ACC, 


0, 

Micropolis, 

6}, 

/ * minor 

6 -/ 

{0/ 

d:r_ acc, 


0, 

Micropolis, 

7 \ 

/* minor 

-? * / 

{ i / 

SEQ_ACC, 

3 , 

0, 

Exabyte, 

0}, 

/ * minor 

S */ 

\ ± 9 

SEQ_ACC, 

3, 

0, 

Exabytenr, 


/* minor 

9 */ 


DIR_ACC/ 

4, 

lllliilllil: 

Hathorpak, 

m. 

/.* minor 

10 */ 

\ 2 >: 


• 4 , 


Ea.thor.pak, 

Blillil 

/* minor 

11 */. 

|2;; 

DIR_ACC, 

“ . 4, 

0, 

Hat:horpak r 

21, 

minor;. 

12 V 


D1R_A€C, 

■4, 

0, 

Hathorpak , 

■ ri. 

/* minor- 


{2 f 

DIR_ACC, 

4, 

0, 

Hathorpak t 

41, 

minor 

i 4 i| 

m 


4, 

0, 

Hathorpak; 

■illiii 

minor; 

11 11 

12, 

DIR^ACC,; , : 

||||| 

. 0/ 

Hathorpak ,, ' • 


/ * minor 

• II II 

{2, 


4 , 

0, ... 

.Hathorpak-, 


minor 

17 v 


3 . Inspect the disk drive to insure that the drive settings match the target id 
and logical unit values specified in the rfdinfo array. The target id of the 
disk drive is set by changing the address of the drive (by changing 
switches, jumpers, etc.). The logical unit number is set by the 
manufacturer, but is usually adjustable (again, by changing switches, 
jumpers, etc.). 
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The following example illustrates the rfdinfo array in the cs35int.h file. 
The shaded portion of the array illustrates the added device specific 
information for the defined tape drive. 

struct device word rfdinfo [ ] = { 


device 

a ev 

target 

logical 

unit 

Partition 

*/ 


L ndex 


id 

unit 

opts 

number */ 



{0, 

c:r_acc, 

5 , 

0, 

LMicropoiis, 

0}, 

/ * minor 0 

-/ 

•!0, 

2 : R_ACC , 

5 

0, 

Micropoiis, 

1}, 

/* minor 1 

*/ 

(0, 

d:r_acc. 

5 , 

0/ 

Micropoiis, 

2}, 

/* minor 2 

V 

{0, 

DIR ACC, 

5 , 

0/ 

Micropoiis, 

3 }, 

/ * minor 3 

*/ 

(0, 

d:r_acc, 

5 , 

0, 

Micropoiis, 

4 } , 

/* miner 4 


* 0 , 

d:r_acc, 


0, 

Micropoiis, 

5 } , 

/* minor 5 

-/ 

r0, 

d:r_acc, 


0, 

Micropoiis, 

6 } , 

/ * minor 6 

"/ 

{0, 

d : R ACC , 

s , 

0, 

Micropoiis, 

3 } , 

/■ minor 7 

M f 

• 1 , 

- > 

3 , 

0, 

Dxaoyte, 

0}, 

/ " minor 8 

m l 

*. 1 , 

S ACC, 

3 , 

0, 

~ xabytenr , 

01, 

/- minor 9 

•/ 

•2, 

C . R ACC, 

4 , 

0, 

Hathorpak, 

0} / 

/ * minor 10 

* / 

■. 2 , 

— ■ _ r. , 

4 , 

0, 

Hathorpak, 

1 } / 

/ * minor 11 

*/ 

•2, 

d:r_acc. 

4 , . 

0, 

Hathorpak, 

2}, 

/ * minor 12 

"/ 

• 2 , 

C - r. ACC , 

4 , 

0, 

Hathorpak, 

3 } , 

/ * minor 13 

*/ 

• 2 , 

DIR ACC , 

4 , 

0, 

Hathorpak, 

4 ;, 

/* minor 14 

*• / 
/ 

«: 2 , 

D . R ACC, 

4 , 

0, 

Hathorpak, 

5 }, 

/* minor It 

' / 

{ 2 , 

d;r_acc, 

4 , 

0, 

Hathorpak, 

6}, 

/- minor 16 

*/ 

{ 2 , 

d:r_acc. 

4 , 

0, 

Hathorpak, 

j - k 

/* miner 17 

*/ 

> 3 :, 

SEQ ACC:, . 

2 r Ai:. : 




/* minor 18 

. - /• 

ih 


2 , 


■:Anabas:i;s^r',, ; : i 

' m 

/'*■ minor 19 



3. Inspect the tape drive to ensure that the drive settings match the target id 
and logical unit values specified in the rfdinfo array. The target id of the 
drive is set by changing the address of the drive (by changing switches, 
jumpers, etc.). The logical unit number is set by the manufacturer, but is 
usually adjustable (again, by changing switches, jumpers, etc.). 
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Tape Drive Defines 

The procedures for specifying defines for a tape drive are as follows: 

1. Enter the following command to access the cs35prm.h file with the vi 
editor: 


vi cs35int.h 

2. Using the vi editor, enter the define statement(s) for the tape drive. 

Specify drive characteristics by “ORing” together the appropriate Flag 
defines (listed in Table C-l). 

For example, suppose you add the following drive reference to the 
RIM FI RE file: 

#A SCSI Tape (Anabasis) 

tape cf3 at cfcl drive 0 flags 0 

The reference specifies a drive that can write only one filemark at a time, 
runs in general mode, is used as a rewindable and no-rewind device, but is 
otherwise a normal tape device. You would enter the following define 
statement in the cs35ini.h file to define the drive as a rewindable device: 

♦define ANABASIS <??_NORMAL i G£N_M0DE ! ONE? I LEMARK ) 

To define the drive as a no-rewind device, you would also enter the 
following define statement: 

♦define ANABASISnr (TP NORMAL I GEN MODE I ONEF I LEMARK I NOREWIND) 
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Floppy Drive Defines 

The procedures for specifying defines for a floppy drive are as follows: 

1. Enter the following command to access the cs35flp.h file with the vi editor: 

vi cs35int . h 

2. Using the vi editor, enter the define statement(s) for the floppy drive. 
Specify drive characteristics by “ORing” together the appropriate Flag 
defines (listed in Table C-3). 

For example, suppose you add the following drive reference to the 
RIMFIRE file: 


# A Floppy Drive - special character ist ics 
disk cf4 at cfcl drive 0 flags 0 


The reference specifies a 5.25 inch DS/DD, 96 tpi, 128 byte sectors drive 
with 18 sectors per track. The following Flag defines would be used to 
specify the drive characteristics: 


C h ara cteris tic s 

5.25", DS/DD, 96 tpi 
1 28 byte sectors 
1 8 sectors per track 


Flag Define 

FLM_1 30DSDD96 
FLSS_128 
FLSPT 18 


The following define statement (including the illustrated Flag defines) 
would be entered in the cs35int.h file: 

#define FLOPPY0 (FLM 130DSDD96 I FLSS 128 i FLSPT 18) 
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The following example illustrates the rfdinfo array in the cs35int.h file. 
The shaded portion of the array illustrates the added device specific 
information for the defined floppy drive. 


- uct dev 

ice word rfdi 

nfo ( ] = 

{ 




device 

dev 

target 

logical 

unit 

Partition 

*/ 

incex 

id 

id 

unit 

opts 

number */ 



3IR_ACC, 

5, 

0, 

Micropolis, 

0}, 

/* minor 0 */ 

(0, 

D I R_ACC , 

5, 

0, 

Micropolis, 

1}, 

/ * minor 1 n / 

(0, 

DIR_ACC, 

5, 

0, 

Micropolis, 

2}, 

/* minor 2 * / 

(0, 

3IR_ACC, 

5, 

0, 

Micropolis, 

3 } / 

/* minor 3 */ 

{0, 

D I R_ACC , 

5, 

0, 

Micropolis, 

4}, 

/* minor 4 */ 

{0, 

D I R_ACC , 

5, 

0, 

Micropolis, 

5}, 

/* minor 5 */ 

{0, 

D I R_ACC , 

5, 

0, 

Micropolis, 

6}, 

/* minor 6 */ 

{0, 

3 iR ACC, 


0, 

Micropolis, 

1 ! 9 

/* minor 7 */ 

\ 1, 

SEQ ACC, 

3/ 

0, 

Exabyte, 

0}, 

/* miner S */ 

i 1/ 

SEQ_ACC, 

3, 

0, 

Exabytenr, 

0}, 

/* minor 9 */ 

(2, 

D I R_ACC , 

4, 

0/ 

Hathorpak, 

0}, 

/* minor 10 V 

(2, 

3 IR_ACC, 

4, 

0, 

Hathorpak, 

1}, 

/* minor 11 ’*/ 

{2, 

3IR_ACC, 

4, 

0, 

Hathorpak, 

2}, 

/* minor 12 */ 

[ 2 , 

3 IR_ACC, 

4, 

0, 

Hathorpak, 

3}, 

/* minor 13 */ 

{ 2 , 

DIR_ACC, 

4, 

0, 

Hathorpak, 

4}, 

/* minor 14 */ 

[ 2 , 

3 I R_ACC , 

4, 

0, 

Hathorpak, 

5}, 

/* minor 15 

{2, 

3 1 R_ACC , 

4, 

0, 

Hathorpak, 

6 } , 

/ * minor 16 */ 

{ 2 , 

3 IR_ACC, 

4, 

0, 

Hathorpak, 

7}, 

/* minor 17 */ 

{ 3, 

3EQ_ACC, 

2, 

0, 

Anabasis, 

0}, 

/* miner 18 */ 

(3, 

SEQ_ACC, 

2, 

0, 

Anabasisnr, 

0}, 

/* minor 19 */ 

(4, 

-LOPPY, 

0xpfe: 4 , ' 

K 



/> minor 20- V 


3. Inspect the floppy drive to ensure that the drive settings match the target 
id and logical unit values specified in the rfdinfo array. The target id is a 
fixed value ( 0xFE) for any floppy drives used. The logical unit number 
corresponds to the physical address (Jumper settings) selected on the 
drive. If more than one floppy device is used, no two physical addresses 
should be the same. Otherwise, addressing of both devices occurs. 
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Appendix D - Manually Making Device Nodes 


Device nodes can be made manually or by using the cs35mk utility. To make 
nodes manually, you will need to enter a mknod command for each minor device 
number in the rfdinfo array (located in the cs35int.h file). The arguments entered 
for a mknod command depend on whether you are making nodes for a disk device 
or tape device. 


Disk Devices 

The following lines illustrate typical mknod commands for block and character 
devices respectively: 


mknod /dev/rsAB b XX ZZ 
mknod /dev/rrsAB c YY ZZ 

Variables (illustrated in bold print) for the previous mknod commands are as 
follows: 

• A - the Device Index in the rfdinfo array (located in the 
sys/sundev/cs35int.h header file) 


• B - the disk partition (a=0, b=l, c=2, d=3, e=4, f=5,g=6, h=7) 


• XX - the Block Device Major number from the bdevsw table in the 
Isyslsunlconf.c file 

• YY - the Character Device Major number from the cdevsw table in the 
Isyslsunlconf.c file 

• ZZ - the Minor number for the device from the rfdinfo array located in the 
Isys/sundev/cs35int.h header file 


1M NOTE: For use with the cs35ut utility program, device names must 

follow the structures illustrated. 


The UNIX Link command can be used if you require different 
node names. 
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Tape Devices 

The following lines illustrate typical mknod commands for block and character 
devices respectively: 

mknod /dev/rtA b XX ZZ 
mknod /dev/rrtA c YY ZZ 

Variables (illustrated in bold print) for the previous mknod commands are as 
follows: 

• A - the device index from the rfdinfo array in the Isys/sundev/cs35int.h 
header file 

• XX - the Block Device Major number from the bdevsw table in the 
sys/sun/conf.c file 

• YY - the Character Device Major number from the cdevsw table in the 
/sys/sun/conf.c file 

• ZZ - the Minor number for the device from the rfdinfo array in the 
Isys/sundev/cs35int.h header file 


NOTE: For use with the cs35ut utility program, device names must 

follow the structures illustrated. 


The UNIX Link command can be used if you require different 
node names. 


Dummy Devices 

The following lines illustrate typical mknod commands for block and character 
devices: 

mknod /dev/ rrdA c YY ZZ 

Because the dummy device is used with the cs35ut utility, only the character node 
is required. 
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Variables (illustrated in bold print) for the previous mknod commands are as 
follows: 

• A - the device index from the rfdinfo array in the Isyslsundevlcs35int.h 
header file 

• YY - the Character Device Major number from the cdevsw table in the 
/sys/sun/conf.c file 

• ZZ - the Minor number for the device from the rfdinfo array in the 
Isys/sundev/cs35int.h header file 
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Appendix E - Error Codes 


This appendix contains a listing of the error codes generated by the Rimfire 3500 
adapter. Error codes are given in hexadecimal, and descriptions are included. 


Rimfire 3500 Error Code Descriptions 

01H Invalid Board Command 

This is returned when a general board command which is not a recognized 
command number is issued. This error is returned only for general board 
commands (Target ID = FFH). 


02H Bad Unit Or ID Number 

This error is returned when a command is issued to a SCSI ED number which is 
greater than 07H and less than FEH. ID values of FEH and FFH are assigned 
special meanings for the Rimfire 3500 adapter, but all other ID numbers greater 
than 07H are impossible ED values. 


03H Floppy Disk Option Not Installed 

This error is generated when a command for the floppy disk unit is issued to a 
board which does not have the floppy disk option present. The host can check 
this by issuing an Identify command, which returns a flag in the Options Flag byte 
indicating the presence or absence of the floppy disk option. 


06H Sector Count = 0 

Sector count indicates disk boot emulation command is invalid. 


07H Cylinder Address Error 

Cylinder indicates disk boot emulation command is invalid. 
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08H Sector Address Error 

Sector indicates disk boot emulation command is invalid. 


09H Head Address Error 

Head indicates disk boot emulation command is invalid. 


OBH Reserved Field Not Zero 

A Reserved field in the parameter block was found to contain a nonzero value. 
All Reserved fields must be set to zero to assure proper operation and allow for 
future enhancements to the board. 


OEH Command List Stopped 

This is not an error; it is returned in the Error field of the last status block placed 
in the command list when a Stop Command List command is executed. This code 
signals that the command list has actually been stopped and all parameter blocks 
in the list have completed. 


OFH Bad Command List Size Field 

During the execution of a Start Command List command, either the number of 
status blocks or the number of command blocks, or the total of the two, exceeded 
the maximum allowable value. A command list must be no longer than 64 
Kbytes, counting the list header. 


11H List Already Active 

A Start Command List command was issued, but the command list was already 
active. This may happen if the list is being stopped, but has not yet had all 
pending commands completed. 


14H Bus Timeout 

A VMEbus transfer did not complete. The Rimfire 3500 adapter detects this with 
a software timer and aborts the command at fault. 
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15H Bus Error 

During a data transfer, the bus did not respond or entered an illegal state. The 
Rimfire 3500 hardware detects this and returns this error code. This is most 
commonly the result of an invalid Source/Destination memory address in a 
parameter block. An invalid Address Modifier can also produce this error. 


16H Scatter/Gather Descriptor Block Read Error 

During a scatter/gather memory transfer, the board unsuccessfully attempted to 
transfer a new scatter/gather memory block. This is usually caused by a bad 
address in the scatter/gather chain. 


1EH SCSI Select Timeout 

An attempt to select a SCSI device failed because the device did not respond. 
This is usually caused by specifying an incorrect Target ID in a parameter block 
or by setting the wrong ID on the target itself. 


IFH SCSI Disconnect Timeout 

A device took too long to reselect the Rimfire 3500 adapter and continue an 
operation. This can be caused by a hardware error in the device. It can also be 
caused by an incorrect setting of the Disconnect Timeout length in the Unit 
Options parameter block. Tape devices, in particular, can take many minutes to 
finish operations such as rewinds or (for cartridge tape drives) searches for 
filemarks. 


20H SCSI Parity Error 

If the General Options command specified parity generation and detection for 
SCSI operations, this error code signals that the parity of the SCSI bus was found 
to be in error. This can be caused by hardware errors in the bus. It can also 
happen if one or more SCSI devices on the bus are not configured to generate 
parity. Parity is a system option and must be set the same for all devices. 

2IH Unexpected SCSI Disconnect 

If, during a SCSI operation, the target disconnects unexpectedly, the Rimfire 3500 
adapter will return this error. This indicates a problem with the device itself or 
with the cable. 
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22H General SCSI Bus Error 

The SCSI interface chip on the Rimfire 3500 adapter detected an erroneous 
condition but did not give sufficient data to indicate the source of the error. This 
normally indicates an abnormal SCSI bus phase or a device which is violating bus 
specifications. 


23H SCSI Device Returned Bad Status 

On completion of a command to a SCSI device, the status returned was 
something other than GOOD (0). The SCSI Status field in the status block 
contains the status returned. If the returned status was CHECK CONDITION (2) 
and the IRS bit was not set in the command, the status block also contains sense 
information about the error. 


24H Unexpected SCSI Phase Encountered 

During normal SCSI operations, the SCSI target requests the transfer of a number 
of different kinds of data, including commands out, status in, data in or out, and 
various messages in both directions. Each command has a normal sequence for 
these data phases, as well as defined variations for error conditions. The adapter 
will handle the management of these phases automatically; however, if the target 
requests a data transfer that cannot be interpreted (such as a message out when 
none was requested or a command out in the middle of a data transfer) the 
operation will be terminated and this error returned. 

The SCSI Status field of the status block contains information on the phase 
encountered. The last three bits of the SCSI Status byte define the phase 
encountered and correspond to the -MSG (bit 2), -C/D (bit 1), and -I/O (bit 0) 
lines on the SCSI bus. 


E-4 


Rimfire 3500 Installation Guide 




Appendix E - Error Codes 


The following example illustrates the SCSI Status byte and lists the phase 
definitions for the last three bits: 


7 

6 

5 

4 

3 

2 

1 

0 

* 

X 

X 

X 

X 

M 

C 

I 1 


Bit 

SCSI Bus Line 

Setting 

Description 

M 

-MSG 

1 

Requested phase was a Message 
phase 



0 

Requested phase was a Data or 
Command Phase 

C 

-C/D 

1 

Command/status information was 
requested 



0 

Ordinary data was requested 

| 

-I/O 

1 

Requested direction was in from 
the device 

1 


0 

Transfer was to be out to the 
device 


This error can be caused by a number of things. If vendor-unique commands are 
being used or if the DBV bit in the parameter block is set to 1, a mis-setting of the 
DAT or DIR bits in the parameter block Flags byte can cause this error. It can 
also be generated by a hardware error in the device or in the adapter. 


25H Bad Byte Seen by SCSI Adapter Chip 

During the execution of a SCSI command, the adapter chip received a command, 
data, or status byte (usually a status byte) that was not interpretable. 

This is normally caused by ID conflicts between the board and the device, or by 
mistakes in parity setting. 


26H Error in Synchronous Transfer Negotiation 

The Rimfire 3500 adapter attempted to negotiate synchronous transfer parameters 
(transfer period and maximum REQ/ACK offset), but the target does not support 
the negotiation and responded improperly. This error will not occur when the 
target negotiates correctly, even if the target itself does not support synchronous 
transfers. It will occur only if the target responds with incorrect or 
incomprehensible requests during the negotiation process. 
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If this error occurs, the adapter will clear the error condition and abort the 
command, which may require a device or bus reset. If the SCSI bus is reset, this 
may affect the operation of other devices on the bus that were active at the time of 
the negotiation. This error can be avoided by disabling the synchronous transfer 
option for devices which do not support negotiation. 


27H SCSI Bus Reset During Operation 

This error indicates that the SCSI bus was reset (by the IRST signal line) during a 
SCSI operation. Any device may reset the SCSI bus. This error occurs if a 
device other than the Rimfire 3500 adapter resets the bus while the Rimfire 3500 
adapter is executing a command. The operation in process is aborted, but 
subsequent commands will be attempted. Note that a reset may cause errors in 
subsequent commands while other devices connected to the bus go through their 
power-on/reset recovery sequences. 


28H Target Command not Found 

The Rimfire 3500 HBA has not received an Enable Target Mode command from 
the host. As a result, it cannot act as a Target. 


29H This command must be issued with a command list 

The command that was issued requires a command list. Reissue the command 
with a command list. 


2AH Drive is write protected 

Disable drive write protection and reissue the command. 

2BH Vendor Unique command set up improperly, modifier field zero. 

2CH Bad SCSI chip condition 

The SCSI adapter chip received a bad command or the wrong target reselected the 
adapter. 

When this error occurs, the SCSI STATUS field in the status block contains the 
status register value from the SCSI adapter chip. 
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Diagnostic Errors 

61H Static RAM Error 

The Rimfire 3500 adapter static RAM is not working properly. The status block 
contains the address and expected/found data for the error. 


62H PROM Checksum Error 

The Rimfire 3500 firmware does not contain the appropriate checksum, a PROM 
is incorrect or defective, or hardware has failed. The firmware PROMs must be 
replaced to guarantee correct board operation. 


63H Undefined Diagnostic Specified 

The Diagnostic command selected a bit for a diagnostic procedure that was not 
defined. This is the only diagnostic error which is caused by a bad setting in the 
parameter block. 


Internal Errors 


80H and above 

Firmware errors. The code and the circumstances of the error should be 
reported to Ciprico. 
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Boot Emulation Errors 

Error codes used by the Rimfire 3523 adapterer depend on the boot emulation 
disable jumper setting. The following table lists Rimfire error codes and their 
corresponding boot emulation error codes. 


Rimfire Error . 

1111! 

Disk 

Emulation 

00H 

Successful completion 

00H 

00H 

Successful completion 

01H 

Invalid command 

15H 

15H 

Unimplemented cmd 

02H 

Bad Unit number 

04H 

04H 

Operation timeout 

03H 

Floppy disk option not installed 

04H 

04H 

Operation timeout 

04H 

Not used 

01H 

01H 

Interrupt pending 

05H 

Not used 

01H 

01H 

Interrupt pending 

06H 

Not used 
Sector count = 0 

01H 

17H 

Interrupt pending 
Sector count = 0 

07H 

Not used 

Cylinder address error 

01H 

07 H 

Interrupt pending 
Cylinder Address Error 

08 H 

Not used 

Sector address error 

01H 

OAH 

Interrupt pending 
Sector address error 

09H 

Not used 

Head address error 



Interrupt pending 
Head address error 

OAH 

Not used 

01H 

01H 

Interrupt pending 

OBH 

Field not zero 

03H 

03H 

Busy conflict 

OCH 

Not used 

01H 

01H 

Interrupt pending 

ODH 

Not used 

01H 

01H 

Interrupt pending 

OEH 

Command list stopped 

03 H 

03H 

Busy conflict 

OFH 

Bad Command List size 

03H 

03 H 

Busy conflict 

10H 

Not used 

01H 

01H 

Interrupt pending 

11 H 

Command list already active 



Busy conflict 

12H 

Not used 

01H 

01H 

Interrupt pending 

13H 

Not used 

01H 

01H 

Interrupt pending 

14H 

Bus timeout 

04H 

04H 

Operation timeout 

15H 

Bus error 

04H 

04H 

Operation timeout 

16H 

Scatter/gather descriptor block read error 

03H 

03 H 

Busy conflict 
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Rimfire Error 



Emulation Error 

17H 

Not used 


warn 


18H 

Not used 

01H 

i 

Interrupt pending 

19H 

Not used 

0IH 

01H 

Interrupt pending 

1AH 

Not used 

01H 

01H 

Interrupt pending 

1BH 

Not used 

01H 

01H 

Interrupt pending 

1CH 

Not used 

01H 


Interrupt pending 

1DH 

Not used 

01H 


Interrupt pending 

1EH 

SCSI select timeout 

16H 

04H 

Drive offline 

1FH 

SCSI disconnect timeout 

04H 

04H 

Operation timeout 

20H 

SCSI parity error 

06H 


Hard error 

21H 

Unexpected SCSI disconnect 

06H 

18H 

Hard error 

22H 

General SCSI bus error 

06H 

18H 

Hard error 

23H 

SCSI device returned bad status 

06H 

18H 

Hard error 

24H 

Unexpected SCSI phase encountered 



Hard error 

25H 

Bad byte seen by SCSI adapter chip 

06H 

18H 

Hard error 

26H 

Error in synchronous transfer negotiation 

06H 

18H 

Hard error 

27H 

Error in scatter/gather operation 

03H 

03 H 

Busy conflict 

28H 

SCSI bus reset during operation 

06H 

18H 

Hard error 

29H 

Not used 

01H 

01H 

Interrupt pending 

2AH 

Not used 

01H 

0IH 

Interrupt pending • 

2BH 

Vendor-unique cmd not set up properly 

03 H 

03 H 

Busy conflict 

2CH 

Emulation not supported 

15H 

15H 

Unimplemented cmd 
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Appendix F - Cables and Connections 


Figures F-l and F-2 illustrate cabling and board interconnection for the Rimfire 
3500 Host Bus Adapter. 


SCSI Interface Floppy Disk Interface 

\ / (Optional) 



Figure F-l Rimfire 3500 Interconnection Diagram 

Table F-l lists suggested cable parts. 

NOTE: On the Rimfire 3517 and Rimfire 3518 HBAs, the SCSI 

interface may be through P2. For the Rimfire 35 1 7, this is 
determined by the SCSI Port Selection jumper (J33) setting. 


Rimfire 3500 Installation Guide 


F-1 





Appendix F - Cables and Connections 


J2 - Floppy Disk Cable 


J1 - SCSI Cable 



Figure F-2 Rimfire 3500 Series Cable Connections 
Table F-l Rimfire 3500 Series Cable Parts 


Gable 

Quantify 


Suggested Parts 

ji 

As Required 

50 Conductor Flat Ribbon Cable 
(10 Feet) 

3M 3365-50 


1 

50 Pin Connector, Socket, Without 

3M 3425-6000 



Strain Relief 

T&B Ansley 609-5000M 


J2 

As Required 

34 Conductor Flat Ribbon Cable 
(10 Feet) 

3M 3365-34 


1 

34 Pin Connector, Socket 

3M 3414-6034 

T&B Ansley 609-3401 M 


1 

34 Pin Card Edge Connector 

3M 3463-0001 

T&B Ansley 609-34 15M 


NOTE: J1 cable may be daisy chained if multiple drives are used. 


3M is a registered trademark of 3M company. T&B Ansley is a registered trademark of 
Thomas & Betts . 


F-2 


Rimfire 3500 Installation Guide 


















Appendix F - Cables and Connections 


Figures F-3 illustrates cabling and board connection for the Rimfire 3523 SCSI 
Boot Adapter. 


SCSI Interface 


/ 



Figure F-3 Rimfire 3523 Interconnection Diagram 


The SCSI interface on the Rimfire 3523 adapter can be through P2. You should 
use a sheilded cable from the Rimfire 3523 adapter to a metal cabinet containing 
the peripheral devices. Inside the cabinet, an unsheilded , flat-ribbon cable allows 
the cable to be daisey-chained more easily. The cumulative length of the cables is 
six meters. If the cabinet is made so the cable exits to another cabinet, but no 
cabinet is attached, terminate the SCSI cable. An external terminator is available 
from Methode Electronics, Inc., part number DM-900. 
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Tables F-2, F-3, and F-4 list cable parts for the Rimfire 3523 bootable adapter. 


Table F-2 Rimfire 3523 P2 SCSI On-board Cable 


Quantity 

Description 

Suggested Parts 

As Required 

15-inch, 50-Conductor, Rat-Ribbon 
Cable 

3M 3365-50 

2 

50-Pin Connector, Socket, Without 
Strain Relief 

3M 3425-6000 


Table F-3 Rimfire 3523 Inside Cabinet Cable ( Unshielded) 


Quantity 

Description 

Suggested: Farts 

As Required 

50-Conductor, Flat-Ribbon Cable 

3M 3365-50 

1 (2 if in-out) 

50-Pin Subminiature D IDC 
Connector 

T&B Ansley 609-50S-M 

1 per device 

50-Pin , Connector, Socket, without 
strain relief 

3M 3425-6000 


Table F-4 Rimfire 3523 J1 Shielded Cable 


Quantity 

Description- 

§§§§i: : ; Suggested Parts 

As Required 

25-pair, Shielded, 100-OHM 
Impedance, SCSI-compatible 


2 

Connector Body 

AMP 205212-3 

100 

Connector Pins 

AMP 66507-9 

2 

Metal Backshell 

AMP 745175-3 


AMP is a trademark of AMP, Inc. 
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»-» NOTE: 


Table F-5 J1 - SCSI Single Ended Interface 


3523 

3500 

; . Signal:;; 

Pin 

Pin 

Name 

34 

2 

EflSfflilfETM— 

2 

4 

-DATA BUS (1) | 

19 

6 

T'|T|i"rilT'"ll 

36 

8 


4 

10 


21 

12 

-DATA BUS (5) I 

38 

14 


6 

16 


23 

18 


40 

20 

GROUND 

8 

22 

GROUND 

25 

24 

GROUND 

42 

26 

TERMINATION POWER 

10 

28 

GROUND 

27 

30 

GROUND 

44 

32 

-ATTENTION 

12 

34 

GROUND 

29 

36 

-BUSY 

46 

38 

-ACKNOWLEDGE 

14 

40 

-RESET 

31 

42 

-MESSAGE 

48 

44 

--SELECT 

16 

46 

-CONTROL/DATA 

33 

48 

-REQUEST 

50 

50 

-INPUT/OUTPUT 


A minus sign(-) next to a Signal Name indicates the signal is 
active low. 

All odd numbered pins except 25 are connected to ground. 
Pin 25 is left open. Some SCSI products that were designed 
before the SCSI standard have pin 25 connected to ground. 

On the 3523, other numbered pins except 9 are connected to 
ground. Pin 9 (pin 25 on the SCSI flat-ribbon header) is left 
open. Some SCSI products were designed before the SCSI 
standard connected this to ground. 
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Table F-6 J1 - SCSI Differential Interface 



Kw •' Signal NaittC • 
SHIELD GROUND 

Pin 

2 

u : - ; Signal Name 
GROUND 

3 

■ 1 MUM 

4 

-DATA BUS (0) 

5 


6 

-DATA BUS (1) 

I 7 


8 

-DATA BUS (0) 

9 


10 

-DATA BUS (1) 

11 

BiEuabil^— ■ 

12 

-DATA BUS (0) 

13 


14 

-DATA BUS (1) 

15 


16 

-DATA BUS (0) 

17 


18 

-DATA BUS (1) 

19 


20 

-DATA BUS (P) 

21 

DIFFERENTIAL SENSE 

22 

GROUND 

23 

GROUND 

24 

GROUND 

25 

TERMINATION POWER 

26 

TERMINATION POWER 

27 

GROUND 

28 

GROUND 

29 

♦ATTENTION 

30 

-ATTENTION 

31 

GROUND 

32 

GROUND 

33 

♦BUSY 

34 

-BUSY 

35 

♦ACKNOWLEDGE 

36 

-ACKNOWLEDGE 

37 

+RESET 

38 

-RESET 

39 

♦MESSAGE 

40 

-MESSAGE 

41 

♦SELECT 

42 

-SELECT 

43 

+CONTROL/DATA 

44 

-CONTROL/DATA 

45 


46 

-request 

47 

+ INPUT/OUTPUT 

48 

-INPUT/OUTPUT 

49 

GROUND 

50. 

GROUND 


NOTE: A plus sign ( +) next to a signal name indicates the positive 

line of a differential signal pair. A minus sign (-) next to a 
signal name indicates the negative line of a differential 
signal pair. 
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NOTE: 


Table F-7 J2 - Floppy Disk Interface 


Pin 

Signal Name 

2 

ACTIVE READ FILTER 

4 

HEAD LOAD 

6 

DRIVE SELECT 3 

8 

INDEX/SECTOR 

10 

DRIVE SELECT 0 

12 

DRIVE SELECT 1 

14 

DRIVE SELECT 2 

16 

MOTOR ON 

18 

DIRECTION 

20 

STEP 

22 

WRITE DATA 

24 

WRITE GATE 

26 

TRACK 0 

28 

WRITE PROTECTED 

30 

READ DATA 

32 

SIDE ONE SELECT 

34 

READY 


All odd numbered pins are connected to ground. 

The ACTIVE READ FILTER signal ( Pin 2) may have 
different designations, depending on the particular drive 
used (i.e., REDUCED WRITE CURRENT SELECT or HIGH 
DENSITY SELECT on some AT compatibles ). 
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Table F-8 PI - VMEbus Pin Assignments 





Row C 

1 

+D00 

-BBSY 

+D08 

2 

+D01 

-BCLR 

+D09 

3 

+D02 

-ACFAIL 

+D10 

4 

+D03 

-BG0IN 

+D11 

5 

+D04 

-BGOOUT 

+D12 

6 

+D05 

-BG1IN 

+D13 

7 

+D06 

-BGIOUT 

+D14 

8 

+D07 

-BG2IN 

+D15 

9 

GND 

-BG20UT 

GND 

— 

+SYSCLK 

-BG3IN 

-SYSFAIL 

11 

GND 

-BG30UT 

-BERR 

12 

-DS1 

-BR0 

-SYSRESET 

13 

-DS0 

-BR1 

-LWORD 

14 

-WRITE 

-BR2 

+AM5 

15 

GND 

-BR3 

+A23 

16 

-DTACK 

+AM0 

+A22 

17 

GND 

+AM1 

+A21 

18 

-AS 

+AM2 

+A20 

19 

GND 

+AM3 

+A19 

20 

-IACK 

GND 

+A18 

21 

-IACKIN 

SERCLK * 

+A17 

22 

-IACKOUT 

SERDAT * 

+A16 

23 

+AM4 

GND 

+A15 

24 

+A07 

-IRQ7 

+A14 

25 ■ 

+A06 

-IRQ6 

+A13 

26 

+A05 

-IRQ5 

+A12 

27 

+A04 

-1RQ4 

+A11 

28 

+A03 

-IRQ3 

+A10 

29 

+A02 

-IR02 

+A09 

30 

+A01 

-1RQ1 

+A08 

31 

-12V 

+5V STDBY 

+12V 

32 

+5V 

+5V 

+5V 


* Indicates unused pin assignments. 
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Table F-9 P2 - Rimfire 3500 VMEbus/SCSI Pin Assignments 



I;;aii 

Rimfire 3517 Only 

Rimfire 3518 Only 

Pin 

; Row B 

Row A 

Row C 

Row A 

Row- C liil 


(VMEbus) 

(SCSI) 

(scsi) 

(SCSI) 

(SCSI) 111® 

1 

+5V 

E EgEEEDED 

GROUND 

GROUND 

SHIELD GROUND 

m 

GND 

-DATA BUS (1) 

GROUND 

■ i 'nil iii liiira 


ra 

Res. 

-DATA BUS (2) 

GROUND 



D 

+A24 

m hiii m Kira 

GROUND 



m 

+A25 


GROUND 

piimmiiMra 

WEMESSBSm 

ra 

+A26 

m i n' i in li ira 

GROUND 

13 >^1 dlETZT— 


ra 

+A27 

BiBjfldlfegQra 

GROUND 

mtEstaAmimm 

■ mi li i ffl WBMM 

ra 

+A28 

-DATA BUS (7) 

GROUND 


E35ZEB IEEE 

ra 

+A29 

-DATA BUS (P) 

GROUND 

msmMkum 

EKBfflaiaf 

■El 

+A30 

GROUND 

GROUND 

-DATA BUS (P) 

+DATA BUS (P) 

11 

+A31 

GROUND 

GROUND 

GROUND 

DIFFERENTIAL 

SENSE 

ra 

GND 

GROUND 

GROUND 

GROUND 

GROUND 

H 

+5V 

TERMINATION 

POWER 

** 

TERMINATION 

POWER 

TERMINATION 

POWER 

El 

+D16 

GROUND 

GROUND 

GROUND 

GROUND 

m 

+D17 

GROUND 

GROUND 

-ATTENTION 

+ATTENTION 

ra 

+D18 

-ATTENTION 

GROUND 

GROUND 

GROUND 

■a 

+D19 

GROUND 

GROUND 

-BUSY 

+BUSY 

m 

+D20 

-BUSY 

GROUND 

-ACKNOWLEDGE 

-•-ACKNOWLEDGE 

m 

+D21 

-ACKNOWLEDGE 

GROUND 

-RESET 

+RESET 


+D22 

-RESET 

GROUND 

-MESSAGE 

+MESSAGE 

ED 

+D23 

-MESSAGE 

GROUND 

-SELECT 

+SELECT 

ED 

GND 

-SELECT 

GROUND 

-CONTROL/DATA 

+CONTROL/DATA 

ra 

EEDflH 

-CONTROL/DATA 

GROUND 

rasrarara 

-(-REQUEST 

ra 

era 

Egsmrarafli 

GROUND 

-INPUT/OUTPUT 

+INPUT/OUTPUT 

ra 

EEDEfl 

-INPUT/OUTPUT 

GROUND 

GROUND 

GROUND 

ra 

+D27 

* 

♦ 

* 

♦ 

EH 

+D28 

* 

* 

* 

* 

ra 

+D29 

* 

* 

* 

* 


+D30 

* 

* 

* 

* 

ra 

+D31 

* 

* 

* 

* 

ra 

GND 

* 

* 

* 

★ 

ra 

+5V 

* 

* 

* 

* 


* Indicates unused pin assignments. 

** Pin Cl 3 (pin 25 on the SCSI flat ribbon header) is left open. Some SCSI products were 
designed before the SCSI Standard connected this to ground. 


Rimfire 3517 - A minus sign (-) next to a signal name indicates the signal is active low. 

Rimfire 3518 - A plus sign ( +) next to the signal name indicates a positive line of a differential 
pair. A minus sign (-) indicates a negative line of a differential pair. 
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Appendix F - Cables and Connections 


Table F-10 P2 - Rimfire 3523 VMEbus/SCSI Pin Assignments 



All 

Rimfire 3523 

r^imfire : ;3S23:!;:; 

Pat 

? Row B 

Row A 

Row A. 


(VMEbos) 

(SCSI) 

(SCSI) 

1 

+5V 

♦ 

* 

2 

GND 

* 

* 

3 

Res. 

% 

♦ 

4 

+A24 

♦ 

* 

5 

+A25 

* 

* 

6 

+A26 

★ 

★ 

7 

+A27 

♦ 

* 

8 

+A28 

GROUND 

-INPUT/OUTPUT 

9 

+A29 

GROUND 

-REQUEST 

10 

+A30 

GROUND 

-CONTROL/DATA 

11 

+A31 

GROUND 

-SELECT 

12 

GND 

GROUND 

-MESSAGE 

13 

+5V 

GROUND 

-RESET 

14 

+D16 

GROUND 

-ACKNOWLEDGE 

15 

+D17 

GROUND 

-BUSY 

16 

+D18 

GROUND 

GROUND 

17 

+D19 

GROUND 

-ATTENTION 

18 

+D20 

GROUND 

GROUND 

19 

+D21 

GROUND 

GROUND 

20 

+D22 

** 

TERMINATION 

POWER 

21 

+D23 

GROUND 

GROUND 

22 

GND 

GROUND 

GROUND 

23 

+D24 

GROUND 

GROUND 

24 

+D25 

GROUND 

-DATA BUS (P) 

25 

+D26 

GROUND 

-DATA BUS (7) 

26 

+D27 

GROUND 

-DATA BUS (6) 

27 

+D28 

GROUND 

-DATA BUS (5) 

28 

: +D29 

GROUND 

-DATA BUS (4) 

29 

+D30 

GROUND 

-DATA BUS (3) 

30 

+D31 

GROUND 

-DATA BUS (2) 

31 

GND 

GROUND 

-DATA BUS (1) 

32 

+5V 

GROUND 

-DATA BUS (0) 


Indicates unused pin assignments . 

Pin A20 (pin 25 on the SCSI flat ribbon header ) is left open. Some SCSI products were 
designed before the SCSI Standard connected this to ground. 
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Perform the procedures in this chapter to manually install the driver for the 
Ciprico Rimfire 3500 adapter. It is distributed on 1/4-inch and 1/2-inch tape. 
Contained on the tapes are a number of files: cs35.c, cs35lib.c, cs35if.h, 
cs35prm.h, cs35io.h, cs35err.h, cs35int.h, cs35flp.h, cs35ut.c, cs35mk.c, Makefile, 
and README. 

Driver Installation - SunOS 3.5 or Earlier 

1. Enter the following commands to create a directory called IsyslCIPRICO: 

mkdir /sys/CIPRICO 

Enter the following command to switch to the directory you created: 

cd /sys/CIPRICO 

2. Use the tar command to copy all files to the IsyslCIPRICO directory. If 
you are using U4 inch tape, enter the following tar command: 

tar xvbf 20 /dev/rst8 

If you are using 1/2 inch tape, enter the following tar command: 
tar xvbf 126 /dev/rmt0 


*■* NOTE: Throughout this procedure you are asked to copy files to a 

file with the same name and a .nocf suffix. Doing so allows 
you to use the upgrade and uninstall programs of the 
installation script. 

For the following steps, replace SunX with the designation 
for the Sun system you are using (i.e., Sun3 for Sun- 3 
Workstations, Sun4 for Sun-4 Workstations, Sun3x for 68030 

Workstations, etc.). 
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3. Enter the following commands to change to the /sys/conf directory and 
copy the current system configuration file. If this is a new installation, the 
file will be named GENERIC. Otherwise, consult the System 
Administrator for the correct file name. Enter a command similar to the 
following to copy the configuration file to the new file name ( RIMFIRE ): 

cd /sys/conf 
cp GENERIC RIMFIRE 

Enter this command to copy the RIMFIRE file to RIMFIRE. nocf. 

cp RIMFIRE RIMFIRE. nocf 

4. Enter the following command to access the RIMFIRE file with the vi 
editor: 


vi RIMFIRE 

Search the RIMFIRE file for the following config line: 


config vmunix swap generic 

You can specify the root and swap devices now, or leave the setting at 
generic, allowing root and swap device specification at boot. 

If the new Rimfire controlled disk is used as the root and swap device, 
edit the config line to look like this: 

config vmunix root on cfO swap on cfO 


NOTE: If the driver was installed with different root and swap 
locations, consult your system administrator before 
changing root and swap locations. 


For each adapter installed, you will need to add an adapter line to the 
RIMFIRE file. The following example illustrates a typical adapter line: 


controller c£c# at vme!6d32 ? csr gbc #### priority 2 vector cfintr fibdP# 
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Variables specifying your particular system configuration (indicated in 
bold print) are as follows: 

• c/e# indicates the Rimfire adapter being installed. This variable is 
incremented for each adapter in the system, cfc # entries and their 
respective adapter distinctions are as follows: 


Adapter 

cfc# 

1st 

cfc0 

2nd 

cfcl 

3rd 

cfc2 

4th 

cfc3 


• 0x #### indicates the board address. During hardware installation 
(see page 2- 2), you were instructed to check the Board Address 
jumper settings for proper addressing. Enter the address currendy 
set on the board address jumpers (A15-A9). 

• 0xF# indicates the interrupt vector. The interrupt vector can be 
assigned any unique, single byte value. Each adapter in your 
system should have a unique interrupt vector value. Typically, 
0xFE is used for the first Rimfire adapter in the system and 0xFA 
is used for the second Rimfire adapter in the system. 

For example, suppose you are installing two Rimfire adapters. The Board 
Address jumpers (A15-A9) on the first Rimfire adapter are set for an 
address of 0x5000. The Board Address jumpers (A15-A9) on the 
second Rimfire adapter are set for an address of 0x5500. The following 
adapter lines would be added to the RIMFIRE file: 


controller cfc0 at vmel6d32 ? csr 0x5000 priority 2 vector cfintr 0xFE 
controller cfcl at vmel6d32 ? csr 0x5500 priority 2 vector cfintr 0xFA 

5. You will also need to add references for each disk or tape drive in your 
system. The following lines illustrate typical tape drive and disk drive 
references: 

tape cf# at cfc# drive 0 flags 0 
disk cf# at cfc# drive 0 flags 0 
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Variables specifying your particular system configuration (indicated in 
bold print) are as follows: 


• c/# represents the Sun logical unit value to assign to the drive 
(corresponding to the device index number in the rfdinfo array). 
The cfit reference is strictly sequential. 

• c/c# indicates the adapter to which the drive is attached. This 
variable is incremented for each adapter in the system, cfc# entries 
and their respective adapter distinctions are as follows: 


Adapter 

c/c# 

1st 

cfc0 

2nd 

cfcl 

3rd 

cfc2 

4th 

cfc3 


When adding drive references, it is a good idea to precede each reference 
with a comment indicating the drive type. The following example 
illustrates drive references for a seven-drive system with two adapters: 

#A Hard Disk (Miniscribe) 

disk cf0 at cfc0 drive 0 flags 0 

#A Hard Disk (WrenV) 

disk cfl at cfc0 drive 0 flags 0 

#A Hard Disk (Micropolis) 

disk cf2 at cfc0 drive 0 flags 0 

#A Hard Disk (Micropolis) 

disk cf3 at cfcl drive 0 flags 0 

#A SCSI Tape — (Archive) 

tape cf4 at cfcl drive 0 flags 0 

#A SCSI Tape - (Wangtek) 

tape cf5 at cfcl drive 0 flags 0 

#A Dummy device 

disk cf6 at cfcl drive 0 flags 0 

6. Move the cursor to the xy entries. The xy entries are similar to the 
following lines: 


controller xyc0 at vmel6dl6 ? csr 
controller xycl at vmel6dl6 ? csr 
disk xy0 at xyc0 drive 0 
disk xyl at xyc0 drive 1 
disk xy2 at xycl drive 0 
disk xy3 at xycl drive 1 


0xEE40 priority 2 vector xyintr 0x48 
0xEE48 priority 2 vector xyintr 0x49 
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The disk boot emulation controller must be addressed at 0xEE40. Other 
controllers cannot be present at this address. You must comment out any 
xy entry with a csr address equaling the 0xEE40 boot emulation address. 
Do this by adding the comment symbol (#) to the beginning of the 
appropriate line. 

For example, if you are installing the Rimfire 3523 controller as the 
primary boot controller, the boot emulation address for the controller is 
0xEE40. In such a case, you must comment out the first xy entry ( xyc0 ) 
and its associated disk entries (xy0 andxyi). Use your editor to add the 
comment symbol (#), as illustrated in this example: 


#controller xyc0 at vmel6dl6 ? csr 0xEE40 priority 2 vector xyintr 0x48 

controller xycl at vmel6dl6 ? csr 0xEE48 priority 2 vector xyintr 0x49 

#disk xy 0 at xyc0 drive 0 

#disk xyl at xyc0 drive 1 

disk xy2 at xycl drive 0 

disk xy3 at xycl drive 1 


7. Move the cursor to the xt entries. The xt entries are similar to these lines: 

controller xtc0 at vmel6dl6 ? csr 0xEE60 priority 2 vector xtintr 0x64 
controller xtcl at vmel6dl6 ? csr 0xEE68 priority 2 vector xtintr 0x65 

The tape boot emulation controller must be addressed at 0x EE60. Other 
controllers cannot be at this address.. You must comment out any xt 
entries with a csr address equaling the boot emulation address of the 
controller you are installing by adding the comment symbol (#) to the 
beginning of the appropriate line. 

For example, if you are installing the Rimfire 3523 controller as the 
bootable tape controller, the boot emulation address for the controller is 
0xEE60. In such a case, you must comment out the first xt entry ( xtc0 ) 
and its associated tape entry (xt0). Use your editor to add the comment 
symbol (#), as illustrated in this example: 


#controller xtc0 at vmel6dl6 ? csr 0xEE60 priority 2 vector xtintr 0x64 
controller xtcl at vmel6dl6 ? csr 0xEE68 priority 2 vector xtintr 0x65 
#tape xt0 at xtc0 drive 1 
tape xtl at xtc0 drive 1 
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8. Also, you must add device-specific information for the drive(s) to the 
rfdinfo array. The rfdinfo array is in the cs35int.h file (located in the 
I sy si CIPRICO I cf directory). 

Enter the following commands to change directories to /sys/CIPRICO/cf 
and access cs35int.h with the vi editor: 

cd /sys /CIPRICO/cf / sundev 
vi cs35int.h 

Add the necessary device- specific information. 
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The following example illustrates the rfdinfo array: 

struct device__word rfdinfo [] = { 


device 

dev 

target 

logical 

unit part ion 

*/ 

index 

id 

id 

unit 

opts number 

*/ 

{0, 

DIR_ACC, 

0, 

0, 

Miniscribe, 0 } , 

/* minor 0 */ 

{0, 

DIR_ACC, 

0, 

0, 

Miniscribe, 1 } , 

/* minor 1 */ 

{0, 

DIR_ACC, 

0, 

0, 

Miniscribe, 2 } , 

/* minor 2 */ 

{ 0 , 

DIR_ACC, 

0, 

0, 

Mini scribe, 3 } , 

/* minor 3 */ 

(0, 

DIR ACC, 

0, 

0, 

Miniscribe, 4 } , 

/* minor 4 */ 

{0, 

DIR_ACC, 

0, 

0, 

Miniscribe, 5 } , 

/* minor 5 */ 

{0, 

DIR_ACC, 

0, 

0, 

Mini scribe, 6} , 

/* minor 6 */ 

{0, 

DIR_ACC, 

0, 

0, 

Miniscribe, 7} , 

/* minor 7 */ 

U, 

DIR ACC, 

1, 

0, 

WrenV, 0 } , 

/* minor 8 */ 

{1, 

DIR_ACC, 

1, 

0, 

WrenV, 1 } , 

/* minor 9 */ 

{1, 

DIR_ACC, 

1, 

0, 

WrenV, 2 } , 

/* minor 10 */ 

a, 

DIR_ACC, 

1, 

Or 

WrenV, 3 } , 

/* minor 11 */ 

a, 

DIR_ACC, 

1/ 

0, 

WrenV, 4 } , 

/* minor 12 V 

a, 

DIR_ACC, 

1/ 

0, 

WrenV, 5 } , 

/* minor 13 */ 

a. 

DIR_ACC, 

1, 

0, 

WrenV, 6 } , 

/* minor 14 V 

a. 

DIR_ACC, 

1, 

0, 

WrenV, 7 } , 

/* minor 15 */ 

{2, 

DIR_ACC, 

2, 

0, 

Micropolis, 0 } , 

/* minor 16 */ 

{ 2 , 

DIR_ACC, 

2, 

0, 

Micropoiis, 1 } , 

/* minor 17 */ 

{2, 

DIR_ACC, 

2, 

0, 

Micropolis, 2 } , 

/* minor 18 */ 

{2, 

DIR_ACC, 

2, 

0, 

Micropolis, 3}, 

/* minor 19 */ 

{2, 

DIR_ACC, 

2, 

Or 

Micropolis, 4 } , 

/* minor 20 */ 

(2, 

DIR__ACC, 

2, 

0, 

Micropolis, 5 } , 

/* minor 21 */ 

(2, 

DIR_ACC, 

2, 

0, 

Micropolis, 6} , 

/* minor 22 */ 

{2, 

DIR_ACC, 

2, 

0, 

Micropolis, 7 } , 

/* minor 23 */ 

{3, 

DIR_ACC, 

3, 

Or 

Micropolis, 0 } , 

/* minor 24 */ 

{3, 

DIR_ACC, 

3, 

Or 

Micropolis, 1 } , 

/* minor 25 */ 

{3, 

DIR_ACC, 

3, 

0, 

Micropolis, 2 } , 

/* minor 26 */ 

{3, 

DIR_ACC, 

3, 

0 9 

Micropolis, 3 } , 

/* minor 27 */ 

{3, 

DIR_ACC, 

3, 

0, 

Micropolis, } , 

/* minor 28 */ 

{3, 

DIR_ACC, 

3, 

Or 

Micropolis, 5 } , 

/* minor 29 */ 

{3, 

DIR_ACC, 

3, 

0, 

Micropolis, 6} , 

/* minor 30 */ 

{3, 

DIR_ACC, 

3, 

Or 

Micropolis, 7 } , 

/* minor 31 */ 

{4, 

SEQ_ACC, 

4, 

Or 

Archive, 0}, 

/* minor 32 */ 

(4, 

SEQ_ACC, 

4, 

Or 

Archivenr, 0} , 

/* minor 33 */ 

{5, 

SEQ_ACC, 

5, 

0, 

WANGTEK, 0}, 

/* minor 34 V 

{5, 

SEQ_ACC, 

5/ 

Or 

WANGTEKnr, 0 } , 

/* minor 35 */ 

{6, 

DUMMY, 

NOT USED, 

NOT USED, 

N0T_USED , 0 } , 

/* minor 36 */ 


Note: If you modify the rfdinfo array, the cs35mk.c make node 

utility must be recompiled before using it to make the new 
device nodes. See Appendix H for information about using 
the make node utility. 
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Variables in the rfdinfo array are as follows: 

• device index indexes the SCSI device as set up in the Sun config 
file (sys/conf/RIMFIRE). For example; Sun configuration cf0w\W 
have a device index of 0, cfl will have a device index of 1, etc. 

• dev id specifies the SCSI device type. For example; SEQ_ACC 
specifies tape, DIR_ACC specifies hard disk, FLOPPY specifies 
floppy, and DUMMY specifies dummy device. 


Note: A dummy device ID was created to work with the RF3500 

utility (cs35ut). A dummy device can be opened even if a 
device does not exist. You can issue a command (for 
example, debug control or identify controller) from the 
restricted command menu for dummy devices. Therefore, if 
a device fails to open, debug can be used. To create a 
dummy device during installation, add an entry to the Sun 
config file (RIMFIRE, see page G-4), and an entry in the 
rfdinfo array (shown in the foregoing example). The make 
node utility (cs35mk) creates the device node as rrdX (rrd6 
in the example), where X represents the device index from 
the rfdinfo array. 


• target id gives the SCSI Target ID number that is set on the drive. 

• logical unit specifies the SCSI logical unit. If the device does not 
support logical units this field is 0. 

• unit opts indexes defines for device unit options (synchronous, not 
synchronous, no read capacity, etc). The defines for the various 
devices (such as Exabyte and Maxtor) can be found in the 
cs35prm.h file. If a define does not exist for your device, you must 
create one. For a detailed description of the unit options and 
procedures for creating defines, see Appendix C . 

• partition number specifies the Device Partition number. If the 
device does not have partitions this field is 0. 

• minor device number appear in the last column of the rfdinfo 
array. They are for reference in creating device nodes, and they 
must be sequential. 
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Also located in the cs35int.h header file, is the coninfo array. The coninfo 
array contains an entry (Target ID) for each possible adapter configured in 
your system. All Ciprico adapters are assigned a default Target ID of 6. 

The following example illustrates the coninfo array: 

static int coninfo [MAXBOARDS] = { 

6 , 

6 , 

6 

} ; 

SCSI devices configured in your system must have a Target ED other than 
6. If a particular SCSI device requires a Target ID of 6, you will need to 
change Target IDs in the coninfo array to a value other than 6. 

9. Enter the following command to access the cs35ifh file with the vi editor: 

vi cs35if.h 

The cs35ifh file has define statements specifying the level of SunOS you 
are running. Use vi to search the cs35ifh file for the following lines: 

/*#define SunOS3 /* define for SunOS 3.2, 3.4, and 3.5 systems */ 
/*#define SunOS4 /* define for SunOS 4.0 systems */ 

Remove the first two characters (/*) from the line specifying the SunOS 
level you are using. 

For example, if you are using SunOS 3.5, the first line of the previous 
example should be modified to read as follows: 

#define SunOS3 /* define for SunOS 3.2, 3.4, and 3.5 systems */ 

Enter this command to write the changes to the cs35ifh file and exit the 
editor: 


: wq! 
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10. Enter the following command to copy the driver files from the 
/sys/CIPRICO/cf directory to the /sys/sundev directory: 

cp cs35*.* /sys/sundev 

11. Enter the following command to copy the driver header files from the 
/sys/CXPRICO/cf directory to the /usr/include/sundev directory: 

cp cs35*.h /usr/include/sundev 

12. Enter the following command to switch to the Isys/sun directory: 

cd /sys/sun 

Enter this command to copy the conf.c file to conf.c. nocf. 

cp conf.c conf.c. nocf 

Access the conf.c file with the vi editor by entering the following 
command: 

vi conf.c 

Edit the conf.c file, adding the following references for cf to the include 
section of the file: 

#include "cf.h" 

#if NCF > 0 

extern int cfopen(), cfcloseO, cf strategy () , cfreadO; 
extern int cfwriteO, cfdump (), cfioctlO, cfsizeO; 


#else 

#define cfopen nodev 

#define cfclose nodev 

#define cfstrategy nodev 

#define cfread nodev 

#define cfwrite nodev 

tdefine cfdump nodev 

#define cfioctl nodev 

#define cfsize 0 

#endif 


Locate the bdevsw structure and add the following reference to the end of 
the structure. Increment the Block Device Major number (represented by 
XX), and make a note of the new number for later use: 

{ cfopen, cfclose, cfstrategy, cfdump, /*XX*/ 
cfsize, 0}, 


G-10 


Rimfire 3500 Installation Guide 




Appendix G - Manual Driver Installation 


Locate the cdevsw structure and add the following reference to the end of 
the structure. Increment the Character Device Major number (represented 
by IT), and make note of the new number for later use. 

{ 

cfopen, 
cf ioctl, 
seltrue, 

}, 

Write the changes to the conf.c file. 

13. Enter this command to copy the swapgeneric.c file to swapgeneric.c.nocf. 
cp swapgeneric.c swapgeneric.c.nocf 
In the swapgeneric.c file, locate these lines for the xy adapter: 

# include "xy.h" 

#if NXY > 0 

extern struct mb__driver xycdriver; 

#endif 

Add these lines after the xy adapter lines: 

# include "cf.h" 

#if NCF > 0 

extern struct mb_driver cfcdriver; 
fendif 

Locate these lines: 

#if NXY > 0 

{"xy", &xycdriver, makedev (XX, 0)}, 

#endif 

In the foregoing lines, XX represents the block device major number 
assigned in the bdevsw structure in the conf.c file. 

Add these lines: 

#if NCF > 0 

{"cf", Scfcdriver, makedev (XX,0)}, 

#endif 

In the foregoing lines, XX represents the block device major number 
assigned in the bdevsw structure in the conf.c file. 


cf close, 
nodev, 

0 , 


cfread, 

nulldev, 

0 , 


cfwrite, 

0 , 


/*YY*/ 
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Then locate the following lines (XX represents the the block device major 
number, and YY represents the character device major number): 

#if NXD > 0 

{"xd", Sxdcdriver, makedev (YY, 0), makedev (XX, 0)}, 

#endif 

Then, add these lines following them: 

#if NCF > 0 

("cf", Scfcdriver, makedev (YY, 0), makedev (XX, 0)}, 

fendif 

14. Enter this command to write the changes to the swap generic. c file and exit 
the editor: 

: wq! 

15. Enter the following command to switch to the /sys/conf directory: 

cd /sys/conf 

Enter this command to copy the devices file to devices. nocf. 

cp devices devices. nocf 
Enter the following command to access the devices file: 

vi devices 


NOTE: For Sun-3 systems running SunOS 3 X, this file is called 
“ devices. sun3” . In which case, you will need to enter “vi 
devices.sun3” to access the appropriate file. 


Edit the devices (or devices. sun3) file. Add the following reference line 
for the Rimfire adapter. Use the incremented number from the bdevsw 
structure (/sys/sun/conf.c) as the reference number (represented by XX). 

cf xx 

Write the changes to the devices (or devices. sun3) file. 
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16. Enter this command to copy the files file to files. nocf. 

cp files files. nocf 

Enter this command to access the files (or files. sun3) file with the vi editor: 


vi files 


NOTE: For Sun-3 systems running SunOS 3J(, this file is called 
“ files. sun3’’ . In which case, you will need to enter “vi 
files.sun3” to access the appropriate file. 


Locate the xy reference and add the following reference lines for the 
optional cs35 device-driver: 


sundev/cs35 . c optional cf device-driver 

sundev/cs351ib . c optional cf device-driver 


NOTE: The hyphen must be included or the system will not read the 

information correctly. 


Write the changes to the files. sun3 or files file. 

17. While still in the Isys/conf directory, use the following config command to 
add the new devices in the configuration: 

config RIMFIRE 

This creates a new subdirectory with the same name as the new 
configuration file. It will also create the object and header files and a 
makefile. 


* * Note: If the config fails, look in /sys/RIMFIRE/makedeperrs for 

information. 
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18. Enter the following commands to change to your new configuration 
directory ( RIMFIRE) and run the make command: 

Cd . . /RIMFIRE 
make 


This will build a new UNIX kernel, including the new adapter and drives. 

When the make command has completed, enter the following command to 
copy the new vmunix to the root directory: 

cp vmunix /test 

The new vmunix is copied to a name other than vmunix for test purposes. 
Once it is tested and proven to work, enter the following command to 
overwrite the original vmunix with the new version: 

rav /vmunix / vmunix. nocf 
mv /test /vmunix 

19. Create the device nodes using the make node utility ( cs35mk :). Refer to 
Appendix H for a description of the utility. 
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NOTE: The following step is necessary only if you are installing a 

bootable device. 


20. Enter this command to change to the /etc directory: 

cd /etc 

Enter this command to copy the f stab file to fstab.nocf: 
cp fstab fstab.nocf 

Copying this file allows you to use the automatic update and deinstallation 
programs. 

If the adapter you are installing is used to boot, edit the fstab file to 
change all xy references to rs. 

Enter this command to write these changes to disk: 

: wq! 

21, Now the system can be shut down and rebooted with the new UNIX 
kernel. 


STOP 

This concludes the installation procedure for systems 
running SunOS $S or earlier. For information on 
formatting and verfyingdrives. see Appendix B. 
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Driver Installation - SunOS 4.0 or later 

1. Enter the following commands to create a directory path called 
/sys/CIPRICO/cf. 

mkdir /sys/CIPRICO 

Enter the following command to switch to the Isys/CIPRICO/cf directory: 

cd /sys/CIPRICO 

2. Use the tar command to copy all files to the /sys/CIPRICOIcf directory. If 
you are using 1/4 inch tape, enter the following tar command: 

tar xvbf 126 /dev/rst8 

If you are using 1/2 inch tape, enter the following tar command: 
tar xvbf 20 /dev/rmt0 


a v NOTE: For the following steps, replace SunX with the designation 

for the Sun system you are using ( i.e., Sun3 for Sun- 3 
Workstations, Sun4 for Sun-4 Workstations, Sun3x for 68030 

Workstations, etc.). 

Throughout this procedure, you are asked to copy files to a 
file with the same name but a .nocf suffix. Doing so allows 
you to use the upgrade and deinstallation programs. 


3. Enter these commands to change to the /sys/sunX/conf directory and 
make a copy of the current system configuration file. If this is a new 
installation, the file will be called GENERIC, otherwise, consult the 
System Administrator for the correct file name. Enter a command similar 
to the following to copy the configuration file to the new file name 
(RIM FIRE): 


cd /sys/sunx/conf 
cp GENERIC RIMFIRE 

Enter this command to copy the RIMFIRE file to RIMFIRE. nocf. 

cp RIMFIRE RIMFIRE. nocf 
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4. Enter the following command to access the RIMFIRE file with the vi 
editor: 


vi RIMFIRE 

Search the RIMFIRE file for the following config line: 


config vmunix swap generic 

You can specify the root and swap devices now, or leave the setting at 
generic, allowing root and swap device specification at boot. 

If the new Rimfire controlled disk is used as the root and swap device, 
edit the config line to look like this: 


config vmunix root on cfO swap on cfO 


NOTE: If the driver was installed with different root and swap 

locations, consult your system administrator before 
changing root and swap locations. 


For each adapter installed, you will need to add a adapter line to the 
RIMFIRE file. The following example illustrates a typical adapter line: 


controller cfc# at vmel6d32 ? csr 0x#### priority 2 vector cfintr 0xF# 

Variables specifying your particular system configuration (indicated in 
bold print) are as follows: 

• c/c# indicates the Rimfire adapter being installed. This variable is 
incremented for each adapter in the system, c/c# entries and their 
respective adapter distinctions are as follows: 


Adapter 

c/c# 

1st 

cfc0 

2nd 

cfcl 

3rd 

cfc2 

4th 

cfc3 
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• 0x#### indicates the board address. During Hardware Installation 
procedures (see page 2-2), you were instructed to check the Board 
Address jumper settings for proper addressing. Enter the address 
currendy set on the Board Address jumpers (A15-A9). 

• 0xF# indicates the interrupt vector. The interrupt vector can be 
assigned any unique, single byte value. Each adapter in your 
system should have a unique interrupt vector value. Typically, 
0xF8 is used for the first Rirnfire adapter in the system and 0xFA 
is used for the second Rirnfire adapter in the system. 

For example, suppose you are installing two Rirnfire adapters. The Board 
Address jumpers (A15-A9) on the first Rirnfire adapter are set for an 
address of 0x5000. The Board Address jumpers (A15-A9) on the 
second Rirnfire adapter are set for an address of 0x5500. The following 
adapter lines would be added to the RIMFIRE file: 


controller cfc0 at vmel6d32 ? csr 0x5000 priority 2 vector cfintr 0xFE 
controller cfcl at vmel6d32 ? csr 0x5500 priority 2 vector cfintr 0xFA 

5. You will also need to add references for each disk or tape drive in your 
system. The following lines illustrate typical tape drive and disk drive 
references: 

tape cf# at cfc# drive 0 flags 0 
disk cf# at cfc# drive 0 flags 0 

Variables specifying your particular system configuration (indicated in 
bold print) are as follows: 

• cftt represents the Sun logical unit value to assign to the drive 
(corresponding to the device index number in the rfdinfo array). 
The cfit reference is stricdy sequential. 

• c/c# indicates the adapter to which the drive is attached. This 
variable is incremented for each adapter in the system, c/c# entries 
and their respective adapter distinctions are as follows: 


Adapter 

c/c# 

1st 

cfc0 

2nd 

cfcl 

3rd 

cfcl 

4th 

cfc3 
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When adding drive references, it is a good idea to proceed each reference 
with a comment indicating the drive type. The following example 
illustrates drive references for a seven-drive system with two adapters: 

#A Hard Disk (Miniscribe) 

disk cf0 at cfc0 drive 0 flags 0 

#A Hard Disk (WrenV) 

disk cfl at cfc0 drive 0 flags 0 

#A Hard Disk (Micropolis) 

disk cf2 at cfc0 drive 0 flags 0 

#A Hard Disk (Micropolis) 

disk cf3 at cfcl drive 0 flags 0 

#A SCSI Tape — (Archive) 

tape cf4 at cfcl drive 0 flags 0 

#A SCSI Tape - (Wangtek) 

tape cf5 at cfcl drive 0 flags 0 

#A Duinmy device 

disk cf6 at cfcl drive 0 flags 0 

6. Move the cursor to the xy entries. The xy entries are similar to the 
following lines: 


controller xyc0 at vmel6dl6 ? csr 
controller xycl at vmel6dl6 ? csr 
disk xy0 at xyc0 drive 0 
disk xyl at xyc0 drive 1 
disk xy2 at xycl drive 0 
disk xy3 at xycl drive 1 


0x£E40 priority 2 vector xyintr 0x48 
0xEE48 priority 2 vector xyintr 0x49 


The disk boot emulation controller must be addressed at 0xEE40. Other 
controllers cannot be present at this address. You must comment out the 
xy entry with a csr 0xEE40 address. Do this by adding the comment 
symbol (#) to the beginning of the appropriate line. 

For example, if you are installing the Rimfire 3523 controller as the 
primary boot controller, the boot emulation address for the controller is 
0xEE40. In such a case, you must comment out the first xy entry (xyc0). 
Use your editor to add the comment symbol (#), as illustrated in this 
example: 


tcontroller xyc0 at vmel6dl6 ? csr 0x£E40 priority 2 vector xyintr 0x48 

controller xycl at vmel6dl6 ? csr 0xEE48 priority 2 vector xyintr 0x49 

#disk xy0 at xyc0 drive 0 

#disk xyl at xyc0 drive 1 

disk xy2 at xycl drive 0 

disk xy3 at xycl drive 1 
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7. Move the cursor to the xt entries. The xt entries are similar to these lines: 

controller xtc0 at vmel6dl6 ? csr 0xEE60 priority 2 vector xtintr 0x64 
controller xtcl at vmel6dl6 ? csr 0xEE68 priority 2 vector xtintr 0x65 

The tape boot emulation controller must be addressed at 0x EE60. Other 
controllers cannot be at this address. You must comment out the xt entries 
with a csr 0xEE60 address by adding the comment symbol (#) to the 
beginning of the appropriate line. 

For example, if you are installing the Rimfire 3523 controller as the 
bootable tape controller, the boot emulation address for the controller is 
0xEE60. In such a case, you must comment out the xt entry ( xtc0 ). Use 
your editor to add the comment symbol (#), as illustrated in this example: 

#controller xtc0 at vmel6dl6 ? csr 0xEE60 priority 2 vector xtintr 0x64 
controller xtcl at vmel6dl6 ? csr 0xEE68 priority 2 vector xtintr 0x65 
#tape xt0 at xtc0 drive 1 
tape xtl at xtc0 drive 1 

8. You will also need to add device specific information for the drive(s) to 
the rfdinfo array. The rfdinfo array is in the cs35int.h file (located in the 
/sys/CIPRICO/cf directory). Enter the following commands to change 
directories to IsyslCIPRlCO/cf and access cs35int.h with the vi editor: 

cd /sys/CIPRICO/cf / sundev 
vi cs35int .h 
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Add the necessary device-specific information. The following example 
illustrates the rfdinfo array: 

struct device word rfdinfo [] = { 


device 

dev 

target 

logical 

unit part ion 

*/ 

index 

id 

id 

unit 

opts number 

*/ 

(0, 

DIR_ACC, 

0, 

0, 

Mini scribe, 0 } , 

/* minor 0 */ 

{0, 

DIR_ACC, 

0, 

0, 

Miniscribe, 1}, 

/* minor 1 */ 

{0, 

DIR_ACC, 

0, 

0, 

Mini scribe, 2} , 

/* minor 2 V 

(0, 

DIR_ACC, 

0, 

0, 

Miniscribe, 3 } , 

/* minor 3 */ 

{0, 

DIR_ACC, 

0, 

0, 

Miniscribe, 4 } , 

/* minor 4 */ 

{0, 

DIR_ACC, 

0, 

0, 

Miniscribe, 5 } , 

/* minor 5 */ 

{0, 

DIR_ACC, 

0, 

0, 

Miniscribe, 6} , 

/* minor 6 */ 

(0, 

DIR_ACC, 

0, 

0, 

Miniscribe, 7} , 

/* minor 7 */ 

{1, 

DIR_ACC, 

1. 

0, 

WrenV, 0 } , 

/* minor 8 */ 

{1, 

DIR_ACC, 

1, 

0, 

WrenV, 1 } , 

/* minor 9 */ 

U, 

DIR_ACC, 

1, 

0, 

WrenV, 2}, 

/* minor 10 */ 

{1, 

DIR_ACC, 

1, 

0, 

WrenV, 3 } , 

/* minor 11 V 

{1, 

DIR_ACC, 

1, 

0, 

WrenV, 4 } , 

/* minor 12 V 

{1, 

DIR_ACC, 

1, 

0, 

WrenV, 5 } , 

/* minor 13 */ 

U, 

DIR_ACC, 

1, 

0, 

WrenV, 6 } , 

/* minor 14 */ 

(1, 

DIR_ACC, 

1, 

0, 

WrenV, 7 } , 

/* minor 15 */ 

(2, 

DIR_ACC, 

2, 

0, 

Micropolis, 0 } , 

/* minor 16 */ 

{ 2 , 

DIR_ACC, 

2, 

0, 

Micropolis, 1 } , 

/* minor 17 */ 

{2, 

DIR_ACC, 

2, 

0, 

Micropolis, 2}, 

/* minor 18 V 

{2, 

DIR_ACC, 

2, 

0, 

Micropolis, 3 } , 

/* minor 19 */ 

{2, 

DIR_ACC, 

2, 

0, 

Micropolis, 4 } , 

/* minor 20 */ 

{2, 

DIR_ACC," 

2, 

0, 

Micropolis, 5 } , 

/* minor 21 */ 

{2, 

DIR_ACC, 

2, 

0, 

Micropolis, 6}, 

/* minor 22 */ 

{2, 

DIR_ACC, 

2, 

0, 

Micropolis, 7 } , 

/* minor 23 */ 

{3, 

DIR_ACC, 

3, 

0, 

Micropolis, 0 } , 

/* minor 24 */ 

(3, 

DIR_ACC, 

3, 

0, ^ 

Micropolis, 1}, 

/* minor 25 */ 

{3, 

DIR__ACC, 

3, 

0, 

Micropolis, 2 } , 

/* minor 26 */ 

(3, 

DIR_ACC, 

3, 

0, 

Micropolis, 3 } , 

/* minor 27 */ 

{3, 

DIR_ACC, 

3, 

0, 

Micropolis, 4 } , 

/* minor 28 */ 

(3, 

DIR_ACC, 

3, 

0, 

Micropolis, 5 } , 

/* minor 29 */ 

{3, 

DIR _ACC, 

3, 

0, 

Micropolis, 6}, 

/* minor 30 */ 

(3, 

DIR ACC, 

3, 

Op 

Micropolis, 7}, 

/* minor 31 V 

{4 f 

SEQ_ACC r 

4, 

Op 

Archive, 0} , 

/* minor 32 */ 

{ 4 , 

SEQ_ACC, 

4, 

Op 

Archivenr, 0} , 

/* minor 33 */ 

{5, 

SEQ_ACC, 

5, 

Op 

WANGTEK, 0 } , 

/* minor 34 */ 

(5, 

SEQ_ACC, 

5, 

0, 

WANGTEKnr, 0 } , 

/* minor 35 */ 

{6, 

DUNMY, 

NOT. USED, 

NOT USED, 

NOT USED, 0} , 

/* minor 36 */ 


*-*■ Note: If you modify the rfdinfo array, the cs35mk.c make node 

utility must be recompiled before using it to make the new 
device nodes. See Appendix H for information about using 
the make node utility. 
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Variables in the rfdinfo array are as follows: 

• device index indexes the SCSI device as set up in the Sun config 
file (/sys/sunX/conf/RIMFIRE). For example. Sun configuration 
cf0 will have a device index of 0, cfl will have a device index of 
1, etc. 

• dev id specifies the SCSI device type. For example; SEQ ACC 
specifies tape, DIR ACC specifies hard disk, FLOPPY specifies 
floppy, and DUMMY specifies dummy device. 


NOTE: A dummy device ID was created to work with the RF3500 
utility (cs35ut). A dummy device can be opened even if a 
device does not exist. You can issue a command (for 
example, debug control or identify controller) from the 
restricted command menu for dummy devices. Therefore, if 
a device fails to open, debug can be used. To create a 
dummy device during installation, add an entry to the Sun 
config file (RIM FIRE, see page G-17), and an entry in the 
rfdinfo array (shown in the foregoing example). The make 
node utility (cs35mk) creates the device node as rrdX, where 
X represents the device index from the rfdinfo array. 


• target id gives the SCSI Target ID number that is set on the drive. 

• logical unit specifies the SCSI logical unit. If the device does not 
support logical units this field is 0. 

• unit opts indexes defines for device unit options (synchronous, not 
synchronous, no read capacity, etc). The defines for the various 
devices (such as Exabyte and Maxtor) can be found in the 
cs35prm.h header file. If a define does not exist for your device, 
you must create one. For a detailed description of the unit options 
and procedures for creating additional defines, see Appendix C . 

• partition number specifies the Device Partition number. If the 
device does not have partitions this field is 0. 

• minor device number appear in the last column of the rfdinfo 
array. They are for reference in creating device nodes, and they 
must be sequential. 
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Also located in the cs35int.h header file, is the coninfo array. The coninfo 
array contains an entry (Target ID) for each possible adapter configured in 
your system. All Ciprico adapters are assigned a default Target ID of 6. 

The following example illustrates the coninfo array: 

static int coninfo [MAXBOARDS ] = { 

6 , 

6 , 

6 

} ; 

SCSI devices configured in your system must have a Target ID other than 
6. If a particular SCSI device requires a Target ED of 6, you will need to 
change Target IDs in the coninfo array to a value other than 6. 

9. Enter the following command to access the cs35if.h file with the vi editor: 

vi cs35if.h 

The cs35ifh file has define statements specifying the level of SunOS you 
are running. Use the vi editor to search for the following lines: 

/*#define SunOS3 /* define for SunOS 3.2, 3.4, and 3.5 systems */ 
/*#define SunOS4 /* define for SunOS 4.0 systems */ 

Remove the first two characters (/*) from the line specifying the SunOS 
level you are using. For example, if you are using SunOS 4.0, the second 
line of the above example should be modified to read as follows: 

tdefine SunOS4 /* define for SunOS 4.0 systems */ 

Enter this command to write the changes to the cs35if.h file and exit the 
editor: 

: wq ! 

10. Enter the following command to copy the driver files from the 
IsyslCIPRICOl c/ directory to the Isys/sundev directory: 

cp cs35*.* /sys/sundev 

11. Enter the following command to copy the driver header files from the 
/sys/CEPRICO/cf directory to the /usr/include/sundev directory: 

cp cs35*.h /usr/include/sundev 
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12. Enter the following command to change directories to Isys/sun : 

cd /sys/sun 

Enter this command to copy the conf.c file to conf.c.nocf: 

cp conf.c conf.c.nocf 

Edit the conf.c file, adding the following references for cf to the include 
section of the file: 

#include "cf.h" 

#if NCF > 0 

extern int cfopen(), cfclose (), cf strategy () , cfreadO; 
extern int cfwriteO, cfdumpO, cfioctlO, cfsize (); 


#else 

#define cfopen nodev 

#define cfclose nodev 

#define cfstrategy nodev 

#define cfread nodev 

#define cfwrite nodev 

# define cfdump nodev 

#define cfioctl nodev 

tdefine cfsize 0 

#endif 


Locate the bdevsw structure and add the following reference to the end of 
the structure. Increment the Block Device Major number (represented by 
XX), and make a note of the new number for later use. 

{ cfopen, cfclose, cfstrategy, cfdump, /*XX*/ 
cfsize, 0 }, 

Locate the cdevsw structure and add the following reference to the end of 
the structure. Increment the Character Device Major number (represented 
by YY), and make note of the new number for later use. 

1 

cfopen, cfclose, cfread, cfwrite, /*YY*/ 

cfioctl, nulldev, seltrue, 0, 

0 , 

}, 

Write the changes to the conf.c file. 

13. Enter this command to copy the swapgeneric.c file to swapgeneric.c.nocf. 

cp swapgeneric.c swapgeneric.c.nocf 
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In the swap generic. c file, locate these lines for the xy adapter: 

♦include "xy.h" 

#if NXY > 0 

extern struct mb_driver xycdriver; 

#endif 

Add these lines after the xy adapter lines: 

♦include "cf.h" 

♦if NCF > 0 

extern struct mb_driver cfcdriver; 

♦endif 

Locate these lines: 

♦if NXY > 0 

{"xy”, ixycdriver, makedev (XX,0)}, 

♦endif 

In the foregoing lines, XX represents the block device major number 
assigned in the bdevsw structure in the conf.c file. 

Add these lines: 

♦if NCF > 0 

{"cf", &cfcdriver, makedev (XX, 0)}, 

♦endif 

In the foregoing lines, XX represents the block device major number 
assigned in the bdevsw structure in the conf.c file. 

Then locate the following lines (XX represents the the block device major 
number, and YY represents the character device major number): 

♦if NXD > 0 

{"xd", Sxdcdriver, makedev (YY, 0), makedev (XX, 0) }., 

♦endif 

Then, add these lines following them: 

♦if NCF > 0 

{"cf", Scfcdriver, makedev (YY, 0), makedev (XX, 0)}, 

♦endif 
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14. Enter this command to write the changes to the swapgeneric.c file and exit 
the editor: 


: wq ! 

15. Enter the following command to change directories to Isys/SunXlconf. 

cd /sys/SunX/conf 

Enter this command to copy the devices file to devices. nocf. 
cp devices devices. nocf 

Enter the following command to access the devices file with the vi editor: 

vi devices 

Edit the devices file. Add the following reference line for the Rimfire 
adapter. Use the incremented number from the bdevsw structure 
(/sys/sun/conf.c) as the reference number (represented by XX). 

cf xx 

Write the changes to the devices file. 

16. Enter this command to copy the files file to files. nocf. 


cp files files. nocf 

Enter the following command to access the files file with the vi editor: 

vi files 

Locate the xy reference and add the following reference lines for the 
optional cs35 device driver. The hyphen must be included or the system 
will not read the information correctly. 

sundev/cs35 . c optional cf device-driver 

sundev/cs351ib . c optional cf device-driver 

Write the changes to the files file. 

17. While still in the I sys/sunX/conf directory, use the following config 
command to add the new devices in the configuration: 

config RIMFIRE 
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This creates a new subdirectory with the same name as the new 
configuration file. It also creates the object and header files and a 
makefile. 


3 f Note: If the config fails, look in Isys/RIMFIREImakedeperrs for 

information. 


18. Enter the following commands to change to your new configuration 
directory ( RIMFIRE) and run the make command: 

cd . . /RIMFIRE 
make 

This will build a new UNIX kernel, including the new adapter and drives. 

When the make command has completed, enter the following command to 
copy the new vmunix to the root directory: 

cp vmunix /test 

The new vmunix is copied to a name other than vmunix for test purposes. 
Once it is tested and proven to work, enter the following command to 
overwrite the original vmunix with the new version: 

mv /vmunix /vmunix. nocf 
mv /test /vmunix 

19. Create the device nodes using the make node utility ( cs35mk ). Refer to 
Appendix H for a description of it. 


** NOTE: The following step is necessary only if you are installing a 

bootable device. 


20. Enter this command to change to the /etc directory: 

cd /etc 

Enter this command to copy th cfstab file to / stab. nocf: 

cp fstab f stab. nocf 
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Copying this file allows you to use the automatic update and deinstallation 
programs. 

If the adapter you are installing is used to boot, edit the f stab file to 
change all xy references to rs. 

Enter this command to write these changes to disk: 

: wq ! 

21. Now, the system can be shut down and rebooted with the new UNIX 
kernel. 



G-28 


Rimfire 3500 Installation Guide 




Appendix H - Using the Make Node Utility 


Follow the steps in this procedure to use the make node utility, cs35mk.c. 

1. Enter the following command to change to the /sys/CIPRICO/cf directory: 

cd /sys/CIPRICO/cf /cs35makedev 

2. Compile the make node utility ( cs35mk.c ) by entering the following 
command: 


make 

The Make Node utility ( cs35mk ) is used to make the device nodes. This 
utility reads device specific information from the rfdinfo array and creates 
the device nodes. You must know the current block major (XX) and 
character major (IT) device numbers to run correctly the cs35mk utility. 
(These are the entries in the bdevsw and cdevsw tables in the conf.c file 
located in the /sys/sun directory. 

Table H-l illustrates the cs35mk options and respective commands for 
creating nodes. 


Table H-l cs35mk Commands 


Option . cs35mk Command 

Individually recreate nodes for the cs35mk 
default path (/dev) 

Recreate all nodes for the default cs35mk y 

path (/dev) 


Individually recreate nodes for a cs35mk n [path] 

specified path (indicated by [path]) 


Recreate all nodes for a specified cs35mk y [path] 

path (indicated by [path]) 
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The command you enter to run the cs35mk utility will vary with the 
number of nodes recreated and the path name for creating the node. The 
standard command to run the cs35mk utility is as follows: 


cs35mk 

If a node exists with the same name as the node you are creating, a request 
appears asking if you want to delete the existing node and create a new 
one. Entering y creates the new node. 

If you would rather recreate all nodes, enter a y as the first argument of the 
command line, as illustrated in the following example: 

cs35mk y 

The cs35 utility uses /dev as the default path name for making nodes. If a 
different path is desired, enter that path as the second argument of the 
command line. The specified path must be for an existing directory. 
Directories can be created with the mkdir command (i.e., mkdir /dev/35) 
For example, the following command would be entered to recreate all 
nodes for ldev/35: 


cs35mk y /.dev/35 

While the following command would be entered to recreate nodes for 
ldev/35 individually: 


cs35mk n /dev/ 35 


When you enter the cs35mk command, the following message is displayed: 


You will need no know the major numbers for born block and 
character devices. If you do not have the information; you 
should stop this program and obtain the required information. 

Do you wish to continue? 

If you enter n , the program will exit to the system prompt. 

If you enter y, you are prompted for the Block Device Major number and 
Character Device Major number, as illustrated in the following lines: 

What is your block device major number? 

What is your character device major number? 
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3. Enter the current Block Device and Character Device major numbers. 

If you elected to recreate all nodes (by entering cs35mk y or cs35mk y 
[path]), device nodes are created automatically. 

If you elected to individually recreate device nodes (by entering cs35mk 
or cs35mk n [path]), lines similar to the following are displayed for each 
existing device node: 

/dev/rrs0a already exists. 

Do you want to remake it? y/n or q 

If you wish to delete the node and create a node with the same name, enter 
y. The program will recreate the device node and continue making nodes. 

If you do not wish to remake the node, enter n. The program will continue 
making nodes. 

4. To quit making device nodes, enter q. The program exits to the system 
prompt. 

If an error occurs while creating a node, a message (similar to the 
following example) appears: 

Can't make node for /dev/rrs0a 

You also have the option of manually creating the device nodes using the 
mknod command. Appendix D gives procedures for manually making the 
device nodes. 

5. After making the nodes, shut down the system and reboot with the new 
UNIX kernel. 
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Appendix I - Adding a Device Manufacturer to the 

installation Script 


If the Device Type menu does not include a device manufacturer you need, you 
can add it to the menu before installation. You need a manual for the device you 
want to add. Follow the steps in this procedure to add a manufacturer to the 
installation script. These examples are for the Maxtor disk drive in asynchronous 
mode. 

1. Enter this command to change to the /sys/CIPRICO/cf/sundev directory: 

cd /sys/CIPRICO/cf/sundev 

Enter this command to edit the cs35prm.h file: 

vi cs35prm.h 

2. Create a define statement for the device you want to add, using Appendix 
C of this manual and the appropriate device manual. In Appendix C, 
ignore the example of the define used in the rfdinfo array; it only applies 
to manual installation of the device driver. 

3. Each device type in the Device Type Menu has a file that contains 
information the install script needs to generate an entry in the rfdinfo 
array. Enter this command to change directories to 
/sys/CIPRICO/cf/install/proto: 

cd /sys/CIPRICO/cf/install/proto 

The device type files all have a file name like this: cf. dev. name. The file 
you create must use this format for the install script to find it. cf.dev is a 
constant prefix, and .name can be anything, but it should be some sort of 
abbreviation of the manufacturers name. 

For example, the Maxtor Asynchronous disk drive file name is 
cf.dev.maxtor, and the Maxtor synchronous disk drive file name is 
cf.dev.maxtors. Enter the following command to create a file for your 
device; NAME is an abbreviation of the device manufactures name: 

vi cf.dev. NAME 
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Adding Device Manufacturers 


The contents of this file are: 

Device description as to show up in menu 
SCSI device type (DIR_ACC for disk ... ) 

Unit options define as created above 

The device description should contain the device manufacturer, the device 
type (disk, tape), and anything else you may want to appear in the Device 
Type menu. 

The SCSI device types are defined in the cs35prm.h header file. The 
device type entry in the file must match one of these types: 


Device Type 


Description 


DIR_ACC 

SEQ_ACC 

PRN 

PROC 

WORM 


Disk 

Tape 

Printer 

Processor 

Write once/read multiple - optical 
disk * 


RDONLYDIR_ACC 

FLOPPY 

DUMMY 


Read only direct access device - 
optical disk 

Floppy device 

Dummy device 


The unit options define is the define you created in step 2. This field 
should contain a define for each configuration needed to operate the 
device. For example, most tape files contain a define for the standard 
device, and one for the no-rewind device because both configurations are 
needed for the device. 


1-2 
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Following are examples of device type files for the Maxtor Asyncronous 
disk drive, the Maxtor Syncronous disk drive, and the Wangtek tape drive: 

Maxtor asyncronous disk drive 

Maxtor Asyncronous Disk Drive 

DIR_ACC 

Maxtor 

Maxtor syncronous disk drive 

Maxtor Syncronous Disk Drive 

DIR_ACC 

MaxtorS 

Wangtek tape drive 

Wangtek QIC Tape Drive 
SEQ_ACC 

WANGTEK WANGTEKnr 
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♦ifndef lint 

♦static char Sccsrid[] - "«(♦) README (75222005) Copyright 1987, 1989 Ciprico, 
♦endif 

The following information applies to revision 2.0 or higher releases of the 
RimFire 3500 Unix Sun OS driver. A nurrtoer of enhancements and alterations 
have been made to the RF3500 driver with the release of version 2.0: 

1) Ciprico has a new device driver nameing system which changes the driver 
file names from rfsd to cs35. The "c" represents Ciprico, the "s" is the 
system code, which is Sun in this case, the "3" is the bus designator as 
used in the products themselves, which is vme, and the "5" is for controller 
type which is SCSI. The driver prefix is changing from rfsd to cf. The 

"c" represents Ciprico, and the "f" is the substitute for 5 for the 3500. 
Because of the way the Sun config file is parsed, numbers could not be 
used in the driver prefix. 

Ciprico Driver Prefix Letter Substitutes: 

Ciprico TM3000 - 0 - a 
1 - b 

Ciprico RF3200 - 2 - c 
3-d 

Ciprico RF3400 - 4 - e 
Ciprico RF3500 - 5 - f 

2) The RF3500 driver now supports multiple RF3500 adapters in the same system. 

3) The Minor device nurrtoer system used to identify the various SCSI devices 
has been greatly simplified and is contained in one master array, (rfdinfo 
located in the header file cs35int.h) 

4) The driver no longer uses the drive and flag fields of the Sun config file. 
This information can now be found in the rfdinfo array located in the 
header file cs35int.h. 

5) A new source code file for standard Ciprico and SCSI functions has been 
added. (This is known as cs351ib.c) 

6) The header file cs35reg.h has been renamed to cs35if.h and has been 
expanded to contain additional code structures. 

Because this driver has been renamed, it is strongly recommended by Ciprico 
to remove the old driver, when updating to 75222005. When reinstalling the 
new driver, use the latest installation manual (21017200) . Below is a list 
of steps to take to remove the old driver from the kernel. If you do not have 
a copy of the latest manual, call Ciprico Customer Support. 

INSTRUCTIONS TO REMOVE THE RF3500 DRIVER FROM KERNEL: 


rfsd XX 

Write the changes to the "devices . sun3" or "devices" file. 

5. If you have the old driver on tape, change directories to /sys/sundev 
and remove the driver from this directory with the following commands: 

cd /sys/sundev 
rm rfsd* 


1. Change to the "/sys/conf/" directory and edit the configuration 
file that contains the Rimfire 3500 controller and device 
references. This file will be refered to as "RIMFIRE" throughout 
these instructions. Remove the reference lines for the controller 
and any drives that have been configured in. Examples are as 
shown below: 
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controller rfsdcO at vmel6d32 ? csr 0x5000 priority 2 vector rfsdintr 0xF8 

controller rfsdcl at vmel6d32 ? csr 0x5500 priority 2 vector rfsdintr OxFA 

#A SCSI Tape (Exabyte) Target ID-5 

tape rfsdO at rfsdcO drive 40 flags 0x211 

#A Hard Disk (Micropolis) Target ID - 0 

disk rfsdl at rfsdcO drive 0 flags 0 

#A Hard Disk (Maxtor) Target ID - 1 

disk rfsd2 at rfsdcO drive 8 flags 0x180 

#A SCSI Tape (Wangtek) Target ID - 2 

tape rf sd3 at rfsdcl drive 16 flags Oxlle 

2. Edit the file "files. sun3" or "files" which is also in the 
"/sys/conf" directory. Locate and remove the "rfsd" reference. 

sundev/rfsd. c optional rfsd device-driver 

Write the changes to the "files. sun3" or "files" file. 

3. Change directories to "/sys/sun" and edit the "conf.c" file. 

Remove the following references to "rfsd" in the include section 
of the file: 

♦include "rfsd.h" 

♦if NRFSD > 0 

extern int rfsdopen(), rfsdclose(), rf sdstrategy ( ) , rfsdread() ; 
extern int rfsdwrite(), rfsdioctl(), rfsdsize(); 


♦else 

♦define rfsdopen nodev 

♦define rfsdclose nodev 

♦define rfsdstrategy nodev 
♦define rfsdread nodev 

♦define rfsdwrite nodev 

♦define rfsdioctl nodev 

♦define rfsdsize 0 

♦endif 


Locate the "bdevsw" structure and remove the following reference 
near the end of the structure. 

{rfsdopen, rfsdclose, rfsdstrategy, nulldev, /*XX*/ 
rfsdsize, 0), 

Locate the cdevsw structure and remove the following reference 
near the end of the structure. 

{ 

rfsdopen, 
rfsdioctl, 
seltrue, 

}, 

Write the changes to the "conf.c" file. 

4. Change directories to "/sys/conf" and edit the "devices. sun3" or 

"devices" file. Remove the following reference line for the Rimfire 
controller. 


rfsdclose, 

nodev, 

0 , 


rfsdread, 

nulldev, 

0 , 


rfsdwrite, 

0 , 


/******************************************************************************* 

******************************************************************************** 






**** 

**** 

**** 



Copyright (C) Ciprico Incorporated 1987. 

Ciprico Incorporated 
2955 Xenium Lane 
Plymouth, MN 55441 
(612) 559-2034 

Module Name: cs35.c 

Package: Rimfire 3500 Driver for UNIX Sun OS on VME bus. 

Module Rev: $Revision$ **** 

Date: $Date$ **** 

Subroutines: cfattach, cfopen, cf close, cfstrategy, 

cfread, cfwrite, cfioctl, cfprint, 
sglcmd, rfsdcmd 

Description: 

This driver handles UNIX I/O requests for the Ciprico 
Rimfire 3500. 
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/******************************************************************************* 
* Revision History * 

******************************************************************************** 


Revision Date Author 

Description of Change 


1.0 07/14/86 
Initial Release. 

1.1 02/02/87 
Initial B Release. 

1.1 08/20/87 

Initial A Release. 


Umesh Gupta 

D. A. Dickey 
D. A. Dickey 


2.1 09/06/89 Jody Martin 

1. Made changes to driver to support the Rimfire 3523 as follows: 

- Made changes to support standalone utility. 

- Made many changes to the cs35ut utility, and the driver ioctl 
calls . 

- Made changes to support the new install script. 

- The format disk command now supports including the defect list 
during the disk format. 

- Changed the command codes to match as close as possible to the 
Rimfire 32XX rfutil. 

- Added support for selecting a dummy device to change debug 
value through the utility if you can't open another disk. 

- Added various features to existing commands. 




1.2 ??/??/?? 


???? ???? 


g- 


k. 

n. 


02/88 John Lind 

Add Sun 4 conpatibility (include files and VME address modifier) 
[rfsd.c, rf sdparam. c] 

Fix retry reset for SEQ_ACC devices [rfsd.c) 

Add the EXABYTE vendor unique parameter to handle Busy Status 
Jody Martin 

Added the following changes made by PURDUE. 

1. Add RFIOCGBLKSIZE and RFIOCSBLKSIZE to get/set block size for 
exabyte drive. 

2. Add the FIXEDBLK flag in the configuration for the exabyte. 

3. Add global variable "rf sd_pr_sense - 0", more debug. 

4. Added a uonEOF flag to keep track of a filemark status, 
when actual data on tape is smaller than requested before 
the filemark, the FM was getting lost. 

5. The driver was changed to not do "Test unit ready" command 
during the slave routine if device is SEQ_ACC. 

6. Change to not skip to filemark on no-rew close after read cmd 

7. Changed code for the Exabyte LEOT error. LEOT will now be 
invisable . 

8. Made corrections to the Berkley "mt" ioctls so the mt command 

03/01/88 K. J. Hopps 

Mods to allow lk block sizes (especially for WORMs) 

03/29/88 Jody Martin 

If the device is a "tape", device initialization will not be done 
until the "open" routine. 

There was a problem with the Restore command and some Sequential 
Access devices. The Residual count (amount of bytes not transfered) 
was set incorrectly if reading data in block mode, when end of file 
was crossed and the drive responded to a request sense with the Valid 
bit of the class byte true. The Restore command would fail, not 
reqesting the next tape, but displaying an error. 

A "Set General Board Options" command will now be the 1st command 
issued to the controller. 

When issueing a Mode Select cmd, the Vme xfer count was set to Oxff 
and the Parameter count was 12. This caused the command to hang if 
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the exact burst juitper was in. The vme xfer count was changed to 12. 

1.4 /* 

04/29/88 Jody Martin 

a. A problem existed in the way B_WANTED flag was cleared. 

b. turned on disconect/reselect feature in the Unit options command. 

c. Added support for new Request Extended Sense bytes. See the flag 
definitions in the rf sdparam. h file. 

05/24/88 Dick Taylor 

d. Corrected status block handling in the rfsdintr routine for extended 
sense bytes. Also added a number of small changes to print the 
target ID in a status block, observe a programmable delay after 
reset, and show that a retry corrected an error. 

e. Changes were made to support the new "Ignor SCSI soft errors" 
feature in the Unit Options command. 

[rfsd.c] [rfsdparam. h] 

06/15/88 Jody Martin 

f. A problem existed in the way iomem was de-allocated in the slave 
routine . 

h. A ”b" error was occurring with the General Options command in the 
"slave" routine because the Extended Parameter block was not being 
zeroed out correctly. 

k. Added the changes so the driver would run on Sun 0S3 or 0S4. 

$Log: I:\software\drivers\rf3500\sun\2_0\vcs\cs35.c_v $ 

Rev 2.0 09 May 1989 11:40:40 JMartin 

Initial revision. 


2.0 04/06/89 Jody Martin 


The major points of interest within this file are ordered as follows: 
Include the include files 
Subroutine definitions 
Variables UNIX needs 
RF 3500 Driver internal structs 
cfattach - Initialization routine 

cfopen - Open routine 

cfclose - Close routine 

cfstrategy - Strategy routine 

cfintr - Interrupt service routine 

cfread - Raw read routine 

cfwrite - Raw write routine 

cfioctl - Ioctl interface routine 

cfprint - Print out a message 

sglcmd - Send a type 0 command to the controller 

rfsdcmd - Send a type 1 command to the controller 


************* 


******************** 


************** 


The subroutines interact as follows. The interaction shown is only for 
those subroutines within this driver, unix subroutines are not shown. 

ROUTINE or SYSTEM CALLS 


I/O system 


cfattach, cfopen, cfclose, 
cfstrategy, cfread, cfwrite, 
cfioctl 


1. Ciprico has a new device driver nameing system which changes the 
driver prefix to cs35 from rfsd. The "c" represents Ciprico, the 
"s" is the system code, which is Sun in this case, the "3" is the 
bus designator as used in the products themselves, which is vme, 
and the "5” is for controller type which is SCSI. 

2. The RF3500 driver now supports multiple RF3500 adapters in the same 
system. 

3. The Minor device number system used to identify the various SCSI 
devices has been greatly simplified and is contained in one master 
array, (rfdinfo located in the header file cs35int.h) 

4. The driver no longer uses the drive and flag fields of the Sun 
config file. This information can now be found in the rfdinfo 
array located in the header file cs35int.h. 

5. A new source code file for standard Ciprico and SCSI functions has 
been added. (This is known as cs351ib.c) 

6. The header file cs35reg.h has been renamed to cs35if.h and has been 
expanded to contain additional code structures. 

7. During cmds other than read/write cmds, the driver was sleeping on 
iomem when waiting for command complete. When running multiple 
devices at the same time, this was a problem because they would 
sometimes have the same address for iomem, thus commands were 
being woken up before they were actully complete. 


Interrupt Mechanism =**> cfintr 


cfattach 

cfopen 

cfclose 

cfstrategy 

cfintr 

cfread 

cfwrite 

cfioctl 

cfprint 

sglcmd 

rfsdcmd 


=«*> sglcmd 

-»■»> rfsdcmd 

***» rfsdcmd 

=»*> (nothing) 

*=> (nothing) 

==> cfstrategy (via physio) 

=*«> cfstrategy (via physio) 

«*> rfsdcmd 

=“> (nothing) 

==> (nothing) 

==»> (nothing) 


******************************************************************************** 


*/ 


$Log$ 
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♦ifndef lint 

static char Sccsid[] - "«(#)cs35.c (75222006) Copyright 1987, 1989 Ciprico, 

#endif 

/* The include file rfsd.h is created during the configuration process on Sun 

* machines. Its name itself is dependent on the configuration process. 

* Basically, what is needed in the include file are two defines: 

* NC5 - Defines how many drives are hooked up to RF3500's 

* NC5C - Defines how many RF 3500' s are plugged into the system 

*/ 

♦include "cf.h" 


/* Don't bother compiling if there aren't any drives. */ 
# if NCF > 0 


Include whatever system include files are needed here. */ 
♦include <sys/param.h> 

♦include <sys/dir.h> 

♦include <sys/user.h> 

♦include <sys/buf.h> 

♦include <sys/systm.h> 

♦include <sys/kernel.h> 

♦include <sys/map.h> 

♦include <sys/ioctl .h> 

♦include <sys/file.h> 

♦include <sys/dk.h> 

♦include <sys/mtio.h> 

♦include <sys/uio.h> 

♦include " . ./sun/dkio.h" 

♦include " . . /sun/dk label . h" 

/machine/psl . h" 

/sundev/mbvar . h" 


♦include 

♦include 

♦include 

♦include 

♦include 

♦include 

♦include 

♦include 


. . /sundev/cs35if .h" 

. . /sundev/cs35io.h" 

. . /sundev/cs35err.h" 
. . /sundev/cs35prm.h" 
. . /sundev/cs35f lp.h" 
. . /sundev/cs35int .h" 


static dword rfsd_ex_gap - 0x0; /* gap thresh, (0-0x7) default is 0x7 */ 

static dword rfsd_ex_MX4_23 = 1; /* set if all drives >« MX4$23 firmware */ 

/* allow mode select of motion, recon, gap */ 

static dword rfsd_ex_write_short_f m - 0; /*use Exabyte short filemarks */ 

static dword rfsd_pr_errlog - 0; /* 01 - uprintf, 02 - printf, 0x8 debug */ 

static dword rfsd_pr_leot - 0; /* set to 0 to shutoff, 1 for sense, 2 verbose */ 

/* dont set this if Exabyte has MX 4 $23 fmwr */ 

/* The devtype variable will be set equal to md_dk of mb_device structure in 

* the slave routine. This will be used in the attach routine to determine if 

* the device is a tape or a disk. I had problems trying to reference this 

* md_dk field of the structure once in the attach routine. ??? 1.3 */ 

short devtype [NCF ] ; 

/* Local buffer header used for executing all the commands 

* except system read/write request 
*/ 

struct buf rfsdbuf [NCF] ; 

struct buf rrfsdbuf [NCF] ; /* Buffers for physical reads & writes. */ 

♦define CREGBUG /* comment out this line if you don't have the register 

♦ifdef CREGBUG 

♦ define REGISTER 

♦else 

♦ define REGISTER register 
♦endif 

/* iomem_count keeps track of how many times the driver has iomem allocated at 

* the present time. At times, when multiple devices are running at once, 

* errors would occur when calling rmalloc for iomem. This counter will be 

* incremented when a succesful rmaolloc occurs for iomem, and decremented when 

* the rmfree is called. If no memory is available when calling rmalloc, and 

* iomem_count i3 not zero, the driver will sleep, waiting for memory to be 

* free. If iomem_count is zero, an actual memory shortage has occured that 

* wasn't caused by our driver, and the driver will return an error. 

* "iomem_w anted” is set to TRUE if NULL is returned from rmalloc when trying 

* to aquire memory from iomem, and sleep () is called. IF iomem_wanted is TRUE 

* when iomem is freed, it is set to FALSE, and wakeupO is called. 

*/ 


♦define b_saddr b_mbinfo 

/* Get a Direct Virtual Memory Address (DVMA) from a virtual kernel address */ 
♦define RF_ADDR(x) ( (int) ( (int) (x) & OxFFFFF) ) /* DVMA address (20 bits) */ 

/* For those routines in the driver which are visible to the outside world, 

* define what they return. 

*/ 


static int iomem__count; 
static byte iomem_wanted; 

/* how long (looping) until controller reset should complete */ 

/* This is MUCH too cpu dependent to really be considered a second. */ 

/* Adjust this as needed. */ 

♦define SECONDS 600000 /* approx, one second in loop */ 


int cfopen(), cfclose(), cfintr(); 
int cfioctl(), cfread() , cfwrite(), 
void cfstrategy () ; 
daddr_t cfsize(); 
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cf dunp ( ) ; 


♦ifdef STANDALONE 
♦define MAX WAIT 
♦ else 

♦define MAX WAIT 
♦endif 
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(2 700* SECONDS) 
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/* wait up to4 5 min for format cmd */ 
/* wait few seconds */ 


static int cfprobe(), cfattach(), cfslave(); 
static caddr_t safealloc(); 
static void safefree(); 


/* Define the structures and storage needed for configuration and runtime */ 
struct mb_ctlr *cf control ler_info [NCFC] ; /* per controller */ 
static struct mb_device *cfdrive_info[NCF] ; /* per drive */ 


/* the driver structure */ 
struct mb_driver cfcdriver 
cfprobe, 
cf slave, 
cfattach, 

0 , 

0 , 

cf intr, 

0, 

"cf ", 

cfdrive_info, 

"cf c", 

cf controller_info, 
MDR_BIODMA, 

0 

); 


{ 

/* the probe routine */ 

/* the slave routine */ 

/* the attach routine */ 

/* there is no mdr_go routine */ 

/* there is no mdr_done routine */ 
/* the intr routine */ 

/* no memory used */ 

/* the device name */ 

/* info per drive */ 

/* the controller name */ 

/* info per controller */ 

/* we do DMA transfers */ 

/* interrupt routine linked list */ 


/* General Options Flag. Putting the options into a variable allows a user */ 
/* to change the options with adb (so they don't have to recompile). */ 

/* NOTE: Suns DO NOT support the BMT option. */ 
static int rfsdoptions »■ DIS; 

/************************************************** 

* Debug macro - execute code if debug level is set 
***************************************** *********/ 

♦define DEBUG (level, code) if (rfsddbg & level) (code); 


/* The Rimfire 3500 uses a circular buffer structure for passing 

* parameter blocks to the controller and returning status blocks 

* from the controller. This structure must be physically contiguous. 

*/ 

static CMDLIST *cmdq[NCFC]; /* one per controller */ 

/* This is the BSY bit of the Rimfire 3500' s Status Port as the controller 

* pictures it. It should be set to zero on a controller reset and toggle 

* for each type zero channel attention. 

*/ 

static int bsybit [NCFC] ; 

/* This is the controller type of each controller. The value is read from 

* the status register of the board after a reset. See rfprobe(). 

*/ 

static int rf sdctype [NCFC] ; 

/* This is the blksiz of the device that gets filled in during the attach 

* routine after a mode sense command is issued. The open routine uses this 

* value when it reads the disk label */ 

static int blksiz [NCF]; 

/* To keep track of all the parameter blocks in the RF3500, the ID field 

* of the standard parameter block is actually a pointer to the associated 

* UNIX buffer. 

* Thus, when we receive a status block from the controller, we can 

* use its identifier to determine which UNIX buffer to free. 

* We also need to keep the return value of mbsetup (mtoinfo) so that 

* we can release the entries in the kernel memory map via mbrelse. 

* Since we don't use the available list pointers in the buf structure 

* we will abuse them by saving mbinfo as a pointer to struct buf. 

*/ 

♦define b_mbinfo av_forw /* from struct buf */ 

♦define b_md_hd av_back /* from struct buf */ 


/* Set the debug flag to turn off debugging or turn on debugging */ 
static dword rfsddbg - 0x0; 


/* the geometry for each of the drives */ 
static struct dk_geom geometry [NCF] ; 


/* fixed/var default mode - should be per drive */ 
static dword rfsd_ex_f ixed - 0; /* set to run in fixed blocksize */ 

static dword rf sd_pr_sense - 0; /* set to 0 to shutoff, 1 for sense, 2 verbose */ 

static dword rf sd_pr_check - 0; /* set to 0 to shutoff, 1 for sense, 2 verbose */ 

/* NOTE: The following flags are Exabyte options only. The 1st five flags * 

* control vender unique parameters for the mode select command for Exabyte * 

* only. These flags will only be monitored for devices with the Exabyte * 

* flag set in unit options field of the rfdinfo array. The next four flags * 

* allow selection of firmware revision, writing short filemarks, and contol * 

* of what gets printed to the screen. */ 

static dword rfsd_ex_optionall - Oxe; /* patchable mode sel 1st vendor byte */ 

/* busy stat, evn byte dis, */ 

static dword rfsd_ex_cart * 1; /* 1 = P5 (European) (pad count ???) */ 

static dword rfsd_ex_motion - 0x80; /‘motion thresh, (l-0xf7) default is 0x80 */ 
static dword rfsd_ex_recon * OxAO; /* reconnect thresh, (l-0xf7) default OxAO */ 


/* the partition information for each of the drives */ 
static struct dk_map partitions [NCF] [NDKMAP] ; 

/* Bit arrays that indicate the state of the devices */ 


A bit for each logical unit. 


er hadn' t seen it */ 


static byte ureserved [NCF] ; 

static byte uwritten [NCF ] ; 

static byte uonfmk[NCF]; 

static byte uonEOF [NCF] ; /* set if drive hit FM,but 

static byte ugeneral [NCF ] ; 

static word uopen[64 * NCFC]; /* uopen is an array of 16 bit words with */ 

/* each word representing a device on the scsi bus, and each bit of the word 
/* representing a partition on the device. Sun presently supports 8 partions 
/* on a disk device, but will be supporting 16 partitions in the future. The 
/* array size is 64 (number of possible target id's multiplied by the number 
/* of possible logical units attached to that target id) multiplied by the 
/* number of controllers configured in the system. */ 
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This Is done 

* For all arrays, for each physical unit (up to NCF of them), use 

* bit 0 for logical unit zero, bit 1 for logical unit one, etc. 

* One exception to this is for disks (including floppies) uopen array. In 

* this case, the lunit is actually (lunit + 1); with lunit — 0 specifying 

* that at least one partition is still open on the disk. The following 

* exception for floppies still applies. 

* The physical unit comes from the minor device number for all device types. 

* SEQ_ACC 4 FLOPPIES: 

* Use the logical unit as specified in the device_target array 

* OTHERS : 

* Use the logical unit as specified in the minor device number 
*/ 

#define uflagon(ary, punt, miner) if (rfdinfo [miner] .dev_id “ SEQ_ACC || \ 

rfdinfo [miner] .tag_id -- OxFE) \ 
arytpunt] |« (1 « rfdinfo [miner] .log_unit) ; \ 
else \ 

arytpunt] |« (1 « rfdinfo [miner] .partition) 

#def ine uf lagof f (ary, punt, miner) if (rfdinfo [miner] . dev_id »« SEQ_ACC || \ 

rfdinfo [miner] .tag_id “ OxFE) \ 
arytpunt] 4« ~ (1 « rfdinfo [miner ]. log_unit) ; \ 
else \ 

arytpunt] 4- '(1 « rfdinfo [miner ] .partition) 
♦define uf lagtst (ary, punt, miner) ( (rfdinfo [miner] .dev_id SEQ_ACC || \ 

rfdinfo [miner] .tag_id -- OxFE) ? \ 
arytpunt] & (1 << rfdinfo [miner] . log_unit) : \ 
arytpunt] & (1 << rfdinfo [miner] . partition) ) 

♦define uopenon (openmsk, miner, index) \ 

openmsk [index] |» (1 « rfdinfo [miner] .partition) 

♦define uopenoff (openmsk, miner, index) \ 

openmsk [index] 4«* -(1 « rfdinfo [miner] .partition) 
♦define uopentst (openmsk, miner, index) \ 

openmsk [index] 4 (1 « rfdinfo [miner] .partition) 

/* What are the record sizes on the device... and how many are there. */ 
ree_info record_inf o [NCF] ; 

/* Set this flag when command list full and some process 

* is waiting for a parameter block 
*/ 

dword pb_wanted [NCFC] ; 

/* ' Identify' status */ 

RETID idstat [NCFC ] ; 


dword kb_xfe r [NCF ] ; 
byte lastop [NCF] ; 
♦define UNDEF 0 

♦define READ 1 

♦define WRITE 2 


/* Kbytes xferred */ 

/* last operation (for errlog) */ 
/* last operation undefined */ 

/* last operation was a READ */ 

/* last operation was a WRITE */ 


/* Rename some of the entries in flags field of buffer header */ 
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******** 

Subroutine : 

Calling Sequence: 
Called by: 

Calling Parameters: 
Local Variables: 


************** 


cf probe 
cf probe () 

UNIX initialization 
None 


timer - for reset timeout 

xpb - pointer to extended parameter block 
setup - setup command list parameter block 
iocgpb - set iocg parameter block 
gopt - set general board options 


pokec, sglcmd 


* Calls Subroutines: 

* 

* Public/Global Variables: 

* Description: 

* This routine is called at startup time to probe for a 

* controller, to reset it, and to configure it for any options 

******************************************************************************* 

static 

cfprobe(rf, ctlr) 

REGISTER RF35REG *rf; 

{ 

dword timer; 

DEBUG (0x1, printf ("cfprobe : controller %d at %x\n B , ctlr, rf);) 
if (ctlr >- NCFC) ( 

DEBUG ( 0x1, printf ("cfprobe : bad controller number %d\n", ctlr); 
return (0) ; 

> 

/* Reset controller and check if it exists */ 
if (pokec((char *) 4rf->reset, 1) !- 0) ( 

/* its not there */ 

DEBUG (0x1, printf ("cfprobe: no controller present at %x\n", rf) 
return (0) ; 

} 

bsybit[ctlr] * 0; 

/* Wait for reset to complete */ 
timer =0; 

while ( (rf->status & SWAB (STATRST) ) SWAB (RESETDONE) ) 

♦ifdef MAXWAIT 

if (++timer > MAXWAIT) { 

printf ("cfprobe : Cannot reset controller: status %x\n", 
return (0) ; 

> 
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♦define b bn 


/* block number */ 


/* Addressing macros */ 

♦define realaddr(n) (RF_ADDR( (dword) (n) ) ) 

static int sglcmd(); 

/* Some defines that should not change */ 

♦define RF3500_ID OxFF /* Target ID for general board commands */ 

/* Mode select user selected values - these will be set to the default 

* values in the cf attach routine. They will can be changed thru the 

* mode select command in the utility, and won't be reset to the 

* default values again until the next time the system is rebooted, 

* or the user chooses the default values. */ 
mode_sel mdsel_val [NCF] ; 


♦else MAXWAIT 

♦endif MAXWAIT 

rfsdctype [ctlr] 


rf->status 4 STATCTYPE; 


/* Mode select tape default values 
mode_sel mdsel_tp_def ” { 


'/ 


0, /* reserved */ 

0, /* medium type */ 

0x10, /* byte2 */ 

8, /* block descriptor length */ 

0, /* density code */ 

0,0,0, /* Number of blocks (MSB) - (LSB) */ 

0, /* reserved */ 

0,2,0 /* Block length - 200 (MSB) - (LSB) */ 


/* Mode select disk default values */ 
mode_sel mdsel_dsk_def - { 


DEBUG (0x1 , printf ("Controller %d is a ", ctlr);) 

DEBUG (0x1, printf ("%s\n", rfsdctype [ctlr] =« STATRF3500 ? "3500" : "Unkn 
if (RFSD_RESET_DELAY) ( 

♦ifndef STANDALONE 

printf ("Waiting %d second%s for SCSI bus reset completion . \n", R 

♦endif 

DELAY (RFSD_RESET_DELAY * 1000000); 

> 

if (rfsdctype [ctlr] i* STATRF3500) { 
return (0) ; 

> 

return (si zeof (RF35REG) ) ; 

} 


0 , 

0 , 


o, 

0 , 0 , 0 , 


}; 

/* Defect list formats 
byte def_lst_fmt [] - { 
0 , /* 

0x4, / 

0x5 


/* reserved */ 

/* medium type */ 

/* byte 2 */ 

/* block descriptor length */ 

/* density code */ 

/* Number of blocks (MSB) - (LSB) */ 

/* reserved */ 

/* Block length - 200 (MSB) - (LSB) */ 


to be used with the format command */ 


Block Format */ 

Index Format */ 

/* Physical Sector Format */ 
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/**************************************************************** *************** 


Subroutine : 


if (iomem — (char *) NULL) { 

DEBUG (0x100, printf ("cfslave : Can't allocate memory for iomem\n" 
return (0) ; 

> 


Calling Sequence: 
Called by: 

Calling Parameters: 

Local Variables: 

Calls Subroutines : 


cfslave (dev, rf) 

UNIX configuration startup 

dev - pointer to device structure 
rf - controllers I/O address 

xpb - and extended parameter block 
pb - standard parameter block 

sglcmd 


/* get an extended parameter block */ 
xpb - (EXTPB *) safe alloc (size of (EXTPB) ) ; 
if (xpb — (EXTPB *) NULL) ( 

printf ("cfslave : Cannot allocate memory for extended PB.\n"); 
safefree ( (caddr_t) iomem) ; 
return (0) ; 

) 


/* Set the General Board Options */ 

DEBUG (0x1 01, printf ("cfslave: Setting General Board Options\n") ; ) 


Public/Global Variables :None 


Description: * 

This routine checks for the existence of the specified drive. * 
We do this by issuing a drive interrogation command. If the * 

controller fails this command, then the drive is not usable. * 


****************************************** *************************************^ 


gopt - (GOPTPB *)axpb->pb; 

bzero ( (char *)gopt, sizeof (EXTPB) ) ; 

gopt->id “ 0; 

gopt->opt flags » rfsdoptions; 
gopt ->throt tie - THROTTLE; 
gopt->ownid - coninf o [dev->md_ctlr] ; 
gopt->targetid - RF3500_ID; 
gopt->command « C_OPTION; 


/*ARGSUSED*/ 

static 

cfslave (dev, rf) 

REGISTER struct mb_device *dev; 
REGISTER RF35REG *rf; 

{ 

REGISTER EXTPB *xpb; 
REGISTER PARMBLK *pb; 
REGISTER UOPPB *upb; 
REGISTER GOPTPB *gopt; 
int timer; 
int dtype; 
int btarget, bunit; 
short unit; 
char * iomem; 
inq_data *inqdat; 
int error, index; 
int found « 0; 
int options; 


if (sglcmd (xpb, cfcontroller_info[dev->md_ctlr] ) ) { 

printf ("cfslave : Cannot set General Board Options 1 \n") ; 

blkpr (&xpb->sb, sizeof (STATBLK) ) ; 

safefree ( (caddr_t ) xpb) ; 

safefree ( (caddr_t) iomem); 

return (0) ; 

} 

/* Issue a 'unit options' command to set the unit up 
*/ 

bzero ((char *)xpb, sizeof (EXTPB) ) ; 
upb - (UOPPB *) &xpb->pb; 
upb->dist imeout - 100000; /* */ 

upb->unitid * rfdinf o[index] . tag_id; /* SCSI target id */ 
upb->targetid = RF3500_ID; 

upb->selt imeout * 256; /* Default is 0 */ 

if (rfdinfo [index] .dev_id !« SEQ_ACC) /* if device is not a tape 

< 


/* Get the index into the device_word structure for the device type, 
target id, logical unit number, and unit options. This is actually 
the minor device number array, but the slave and attach routines 
don't know about minor device numbers. */ 

for (index - 0; index <» MAX MINOR; index++) { 

if (dev->md_unit “ rfdinfo [ index] .dev_index) { 

unit - rfdinfo [index] .dev_index; /* get unit number */ 
found ■> 1; /* found index into device_word array */ 
break; 


upb->retrycntrl =* 
upb->retrylimit «* 

) else 
{ 

upb->retrycntrl » 
upb->retrylimit * 

} 

upb->uflags = 0; 

/* set the request sense, 
/* the flags field of the 
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RCRBE | RCRCE | RCRPE | RCISB | SCINT; 


byte count. This is set by the user in 
config file for each device 1.4b*/ 


*/ 


/ 


if ( ! found) { 

printf ("cfslave : config file doesn't match device_word array 
return (0); 

} 

/* If configured device is dummy, return without error */ 
if (rfdinfo [index] .dev_id — DUMMY) 

{ 

DEBUG (0x1 00, printf ("cfslave: found DUMMY device\n");> 
return (1) ; 

} 


if (options & REQLENHI) { 

if (options & REQLENLO) { 
upb->reqlength = 

) else { 

upb->reqlength = 

) 

( 

if (options & REQLENLO) { 
upb->reqlength = 

} else { 

upb->reqlength «* 


> 


} else { 


32; 

24; 


16; 


0; /* set to 0 to select default (8) */ 
/* for firmware compatablility */ 


/* options is the unit options in the rfdinfo array for this device */ 
if (rfdinfo [index] .tag_id =« OxFE) { 
options - 0; 

} else { 

options « rfdinfo [index] .unit_ops; 

} 

/* Set the mode select values to the defaults during boot. These 

* values can be changes after a device is opened with the 

* cs35ut utility. 

*/ 

if (rfdinfo[index] .dev_id -« DIR_ACC) 

{ 

mdsel_val [unit] - mdsel_dsk_def ; 

} else 

{ 

mdsel_val [unit] - mdsel_tp_def ; 

) 

/* Lets do error checking on the configuration since the device type 
has to be entered in both the config file (GENERIC) and the minor 
device number table (rfdinfo[]) */ 

if (dev->md_dk) { 

if (rfdinfo [index] ,dev_id »= SEQ_ACC) { 

printf ("devtype in config file does not match dev type i 
return (0); 

> 

} else { 

if (rfdinfo [index] ,dev_id !* SEQ_ACC) { 

printf ("devtype in config file does not match dev type i 
return (0); 

} 

} 

/* Floppies are always there sort of. */ 

if (rfdinfo [index] .tag_id == OxFE) { 
return (1) ; 

} 

iomem = (char *) safealloc (MEMSIZE) ; 


if (options & NORETRYSOFT) { 

upb->uf lags |« UF_ISE; 

} 

if (options & SYNCHRONOUS) { 

upb->u flags |* UF_SYN; 

) 

upb->command - C_UNIT0PT; 

DEBUG (0x201, printf ( "cfslave : Setting unit options for target id 0x%x\n”, 
if (sglcmd (xpb, cfcontroller_info[dev->md_ctlr] ) ) { 

DEBUG(0x201, printf ("cfslave : cannot access device\n");) 
safefree ( (caddr_t ) xpb) ; 
safefree ( (caddr_t ) iomem) ; 
return (0) ; 

) 

/* If Seq. Access device (tape), don't check for device rdy till open*/ 
/* Try once to see if the unit is ready, or wait up to 3 minutes */ 

/* if LONGRDYWAIT is set in the flags. */ 

if (rfdinf o [index] .dev_id 1- SEQ_ACC) { /* if device is not a tape */ 

timer = (options a LONGRDYWAIT) ? 180 : 1; 
while (timer) { 

/* Issue a 'test unit ready' command to check if the 
* device is present 
*/ 

bzero((char *)xpb, sizeof (EXTPB) ) ; 

xpb- >pb . s cdb . cmd * SC_READY; 

xpb->pb. target id = rfdinfo [index] . tag_id; 

xpb->pb. scdb.bytel ** rfdinfo [index] . log_unit « 5; 

DEBUG (0x201 , printf ("cfslave : Testing for device existenc 

if ((error = sglcmd(xpb, cf controller_info [dev->md_ctlr] 

if (sglcmd(xpb, cf controller_info [dev->md_ctlr] ) 
if ( — timer) { 

DELAY (1000000) ; /* Wait 1 second 
continue; 

) 

DEBUG (0x201, printf ("cfslave : cannot acc 
safefree ( (caddr_t) xpb) ; 
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aafefree ( (caddr_t) iomera) ; 
return (0) ; 

} else 

break; 

} else 

break; 

) 

} 

/‘ success */ 
safefree ( (caddr_t ) xpb) ; 
safefree ( (caddr_t) iomero) ; 
return (1) ; 


read_cap *rc; 
i nq_dat a * i nqd a t ; 
blk_lim ‘blklim; 
int offset; 

SETUPPB ‘setup; 

GOP TP B ‘gopt; 

UOPPB *upb; 
struct vec *vp; 
int res, index; 
int goodlabel » 0; 
int found « 0; 
int options; 

/* Get the index into the device_word structure for the device type, 
target id, logical unit number, and unit options. This is actually 
the minor device number array, but the slave and attach routines 
don't know about minor device numbers. */ 


for (index - 0; index <- MAXMINOR; index++) { 

if (device->md_unit « rfdinfo [index] .dev_index) { 
found * 1; 

unit * rfdinfo [index] ,dev_index; 
break; 


> 

} 

if ( ! found) { 

printf ("cfattach: config file doesn't match device_word array ch 

} 


/* Is the unit value ok? */ 
if (unit >- NCF) { 

printf ("cfattach: Illegal unit«0x%x\n", unit); 
return (0) ; 

} 


/* If configured device is dummy, return without error ‘/ 
if (rfdinfo [ index] .dev_id — DUMMY) 

< 

DEBUG (0x100, printf ("cfattach: attached DUMMY device\n") ; ) 
return (1) ; 


/* blksiz[unit] is filled in a global variable that is filled in during 

* the attach routine, and used in the open routine when reading the 

* label. */ 

blksizfunit] - 0; /* pre-init to bad value */ 


/* allocate space for extended parameter block and command list(s) */ 
xpb - (EXTPB * ) safealloc {sizeof (EXTPB) ) ; 
if (xpb == (EXTPB *) NULL) { 

DEBUG (0x100, printf ("cfattach: Can't allocate memory for xpb\n") 
return (0) ; 

> 

DEBUG (0x2 , printf ("cfattach: allocated EXTPB at %x\n", xpb);) 
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/**********************: 

* Subroutine: 

* Calling Sequence: 

* 

* Called by: 

* 

* Calling Parameters: 

* Local Variables: 


Calls Subroutines : 






************* 


cfattach 
cfattach (device) 

UNIX configuration startup 

device - the device to do the housework for 

rf - the controller address 
xpb - extended parameter block 
label - disk label structure 
cpb - configuration parameter block 
pb - standard parameter block 
usable - usable number of disk blocks 
physical - physical number of disk blocks 
gp - pointer to disk geometry 

sglcmd 

Public/Global Variables :None 
Description : 

This function does preliminary setup work for a 

specified slave number. If the drive is found, the label is 

read in. 


****************** 


*********** 


***************/ 


static 

cfattach (device) 

REGISTER struct mb_device ‘device; 

{ 

REGISTER EXTPB *xpb; 

REGISTER CMDLIST ‘cmdptr; 
register int btarget, bunit; 
register int unit; 
register int dtype; 

REGISTER mode_sel ‘ms; 
REGISTER page_5 *p5; 

REGISTER page_4 *p4; 

REGISTER page_3 *p3; 

REGISTER page_2 *p2; 

REGISTER page_l *pl; 

REGISTER page_20 *p20; 
struct dk_label ‘label; 
PARMBLK *pb; 
int usable, physical; 
struct dk_geom *gp; 
int i; 

unsigned short *wp; 
unsigned short cksum; 
char ‘iomera; 

int mxbsize, mnbsize, bsize; 


iomem =■ (char *) safealloc (MEMSIZE) ; 
if (iomem *** (char *) NULL) { 

DEBUG (0x100, printf ("cfattach: Can't allocate memory for iomem\n 
safefree ( (caddr^t ) xpb) ; 
return (0) ; 

) 

DEBUG (0x2, printf ("cfattach: allocated iomem at %x\n", iomem);) 


btarget = rfdinfo [index] . tag_id; /* btarget 
bunit = rfdinfo [index] . log_unit; /* bunit - 
dtype = rfdinfo [index] . dev_id; /* dtype = 

if (rfdinfo [index] .tag_id — OxFE) { 
options * 0; 

} else { 

options = rfdinfo [index] .unit_ops; 

> 


= scsi target id */ 
scsi logical unit # */ 
device type- DIR_ACC etc */ 


/* the unit options */ 


cmdptr » cmdq [ device ->md_ctlr] ; 

/* Allocate a command queue for each controller. */ 
if (cmdptr -« (CMDLIST *) NULL) { 

cmdq [device->md_ctlr] - (CMDLIST ‘) safealloc (sizeof (CMDLIST) ) ; 
DEBUG (0x2, printf ("cfattach: allocated cmdlist at %x", cmdq[devi 
DEBUG (0x2, printf (" for controller %d\n", device->md_ctlr) ; ) 
cmdptr - cmdq[device->md_ctlr] ; 
if (cmdptr *- (CMDLIST *) NULL) { 

printf ("cfattach: Cannot allocate memory for command lis 
safefree ( (caddr_t) xpb) ; 
return (0) ; 

} 

/* Initialize the command list buffer: 

* set IN and OUT pointers to zero 

* set the list size fields 
*/ 

cmdptr->pbin * 0; 
cmdptr ->pbout * 0; 
cmdptr ->sbin * 0; 
cmdptr ->sbout = 0; 
cmdptr ->pbsi ze » NPB; 
cmdptr->sbsi ze * NSB; 

cmdptr ->resv [0] — cmdptr->resv [1] =0; 

/* Use an extended parameter block to issue type 0 commands 

* disable interrupts and wait for these commands to corrplete. 

*/ 

xpb->intr = 0; 
xpb->resv0 * 0; 
xpb->resvl - 0; 

/* Issue a ' Start command list' command 

* Let the controller know where the command list buffer is 
*/ 

DEBUG ( 0x100, printf ("cfattach: Issuing 'Start command list' comm 

setup - (SETUPPB *)*xpb->pb; 
bzero( (char *) setup, sizeof (EXTPB) ) ; 




Nov 22 09:31 1989 cs35.c Page 22 
setup->id - 0; 

setup->addrmod - VME_ADD_MOD ; 
setup->targetid - RF3500_ID; 
setup->memaddr - realaddr (crodptr) ; 
vp - device->md_mc->mc_intr; 

setup->intr - (devlce->rod_mc->mc_intpri « 8) | vp->v vec; 
setup->command - C_STARTCL; 

if (sglcmd(xpb, device ->md_mc) ) { 

printf ("cfattach: Cannot setup command listi\n"); 

blkpr (4xpb->sb, sizeof (STATBLK) ) ; 

aafefree ( (caddr_t) cmdptr) ; 

safefree ( (caddr_t) xpb) ; 

return (0) ; 

> 

/* Issue 'identify' command to the adapter */ 

DEBUG (0x101, printf ("cfattach: Issuing 'identify' command to the 

bzero ( (char *)txpb->pb, sizeof (EXTPB) ) ; 

xpb->pb. targetid - RF3500_ID; 

xpb ->pb. scdb.cmd « C_IDENTIFY; 

if ( !sglcmd(xpb, device->md_mc) ) 

idstat [device->md ctlr] - * (RETID *) 4xpb->sb; 

} 

/* Issue 'Inquiry' command. .. is this device bloc* or direct access? */ 

/* or what? If this is a tape, do not do an Inquiry command on boot*/ 

/* because some tape drives (EXABYTE) require a tape to be loaded, */ 

/* for the command to conplete with any sort of expected response. */ 

/* When the tape is not loaded, a hang condition was happening if Inq */ 
/* command was issued. */ 
if (dtype 1- SEQ_ACC) { 

bzero ((char *)4xpb->pb, sizeof (EXTPB) ) ; 

xpb->pb. targetid - btarget; 

xpb->pb. addrmod - VME_ADD_MOD; 

xpb->pb . vmeaddr - RF_ADDR ( iomem) ; 

xpb->pb. count - sizeof (inq_data) ; 

xpb->pb. scdb.cmd - SC_INQUIRY; 

xpb->pb.8cdb.bytel - bunit « 5; 

xpb->pb. scdb. by to 4 - sizeof (inq_data) ; 

inqdat - (inq_data *) iomem; 

bzero ( (char *) inqdat, sizeof (inq_data)); 

DEBUG(0x201, printf ("cfattach: Issuing 'inquiry' command to unit 
if (sglcmd(xpb, device ->md_mc) ) { 

DEBUG (0x201, printf ("cfattach: cannot inquire device \n”) 
safefree ( (caddr_t) xpb) ; 
safefree ( (caddr_t) iomem) ; 
return (0) ; 

} 

utype[unit] - inqdat ->dtype; 

DEBUG (0x201 , printf ( "cfattach: device is a %x utype\n", dtype);) 
if (dtype — LUN_NOTPRES) { 

DEBUG (0x201, printf ( "cfattach: device not present \n" ); ) 
safefree ( (caddr_t) xpb) ; 
safefree ( (caddr_t) iomem) ; 
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xpb- >pb. addrmod = VME_ADD_MOD; 

xpb->pb. vmeaddr * RF_ADDR ( iomem) ; 

xpb->pb. count = 44; /* used to be 36 */ 

xpb->pb. scdb. cmd = SC_SELMODE; 

xpb->pb. scdb.bytel - bunit « 5; 

xpb- >pb. scdb. byte4 - 44; /* used to be 36 */ 

ms->medium_type - FL_MEDIA (rfdinfo [index] .unit_ops) ; 

ms->blk_des_len =8; 

ms->density_code « 0; 

ms->nblk [ 0] - 0; 

ms->nblk[l] - 0; 

ms->nblk[2] -0; 

ms->blklen(0] -BYTE2 (FL SECTS (rfdinfo [ index] .unit ops) ) ; 
ms->blklen [1] -BYTE1(FL SECTS (rfdinfo ( index] . unit ops)); 
ms->blklen [2] -BYTE0 (FL_SECTS (rfdinfo [ index] .unit_ops)) ; 
p5 - (page_5 *) ms->vend_uniq; 
bzero( (char *)p5, sizeof (page_5)); 
p5->page_code = 5; 

p5->page_length = 22; /* Don't count length or code */ 

p5->dsr »■ 3000; 

p5->hd_st_dly « 1; 

p5->on dly « 10; 

p5->of f dly = 40; 

p5->hd_ld_dly « 1; 

/* The variable parameters */ 

if ( (FL_MEDIA(rfdinfo [index] .unit_ops) —OxlA) || (FL_M 
p5->xfer_rate - 0xlF4; /* 500 kbit/s */ 

else 

p5->xfer_rate - OxFA; /* 250 kbit/s */ 

p5->nheads - 2 - (FL MEDIA(rfdinfo[index] .unit ops) & 1) 
if ( FL_SECTS( rfdinfo [ index ] .unit_ops) <»0) ( 

printf ( "cfattach: Error in floppy block size con 
safefree ( (caddr_t) xpb) ; 
safefree ( (caddr_t) iomem) ; 
ret urn (0); 

) 

p5->nbps «= (word) FL_SECTS (rfdinfo [index] .unit_ops) ; 
p5->spt « FL_SPT (rfdinfo [index] . unit_ops) ; 
if (FL MEDIA (rfdinfo [index] .unit ops) »■ 0x16 | | 

FL_MEDIA (rfdinfo [ index] .unit_ops) — OxlA || 

FL_MEDIA (rfdinfo [ index] . unit_ops) «« OxlE) 
p5->ncyls ■ 80; 

else if (FL_MEDIA( rfdinfo [index] .unit_ops) <- OxA) /*8"*/ 
p5->ncyls * 76; 

else 

p5->ncyls - 40; 

/* Now adjust cylinders for the number of steps. */ 
if (FL RDSTP( rfdinfo [index] .unit ops) > 0) 

p5->ncyls /- (FL RDSTP (rfdinfo [index] .unit ops) 
if (FL_MEDIA (rfdinfo [ index] .unit_ops) <- OxA) /* 8" */ 
p5->s_wpre - 43; 

else 

p5->s_wpre « 255; 

/* Reduce Write Current same as Write Precomp for 
all non-AT (high density, OxlA) floppies. */ 

if ( FL_MEDIA ( rfdinfo [ index ] .unit_ops) == OxlA) 
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return (0) ; 

p5->s rwc ■ 255; 

) 

if (! (rfdinfo [index] . unit_ops & OS9FLOPPY) ) { 

if ((btarget OxFE) 44 (utype [device->md_unit] !- rfdinfo[inde 

p5->ssn_s0 = 1; 

printf ( "cfattach: Inquiry information does not match the 

p5->ssn si * 1; 

safefree ( (caddr_t) xpb) ; 

) 

safefree ( (caddr_t) iomem) ; 


return (0); 

/* Now do page 20... */ 

} 

p20 « (page_20 *) ip5[l]; 

} 

bzero((char *) p20, sizeof (page_20) ) ; 


p2 0 - >page_code - 0x20; /* Fixed value*/ 

switch (dtype) ( 

p20->page_length * 6; /* bytes */ 

case DIR_ACC: 

/* If 0, length is 33bytes (single density) or 62 bytes (double den) */ 

case WORM: 

p20->post_index = 0; 

case RDONLYDIR_ACC : 

/* If 0, length is 33bytes (single density) or 62 bytes (double den) */ 

break; 

p20->inter_sector = 0; 

default : 

p20->tverify = 0; /* Don't verify seeks */ 

if (dtype 1- SEQ_ACC) { 

p20->tsteps - (FL_RDSTP (rfdinfo [index] .unit_ops) + 1); 

printf ("cfattach: Unimplemented device used: %s 


safe free ( ( caddr_t ) xpb ) ; 

DEBUG (0x201, printf ("cfattach: Setting floppy parameters. 

safefree ( (caddr_t) iomem) ; 

if (sglcmd(xpb, device->md_mc) ) { 

return (0) ; 

DEBUG (0x201, printf ("cfattach: cannot set floppy 

} 

safefree ( (caddr_t) xpb) ; 

> 

safefree ( (caddr_t) iomem) ; 


return (0) ; 

if (dtype -- DIR_ACC | | dtype ~ WORM | | dtype =>« RDONLYD I R_AC C ) ( 

} 

if (btarget !- OxFE) { 

goto skiplabel; 

/* Issue a mode sense for page 2. */ 


bzero ((char *)4xpb->pb, sizeof (EXTPB) ) ; 

} 

pb - 4xpb->pb; 


pb->id - 0; 

label - (struct dk_label *) iomem; 

pb->targetid - btarget; 


pb->addrmod - VME_ADD_MOD; 

/* set up a read command for the first sector */ 

pb->vmeaddr « RF_ADDR (iomem) ; 

pb = &xpb->pb; 

pb->count - MEMSIZE; 

pb->id -0; 

pb->scdb. cmd - SC_SENMODE; 

pb->targetid «= btarget; 

pb->scdb.bytel = bunit << 5; 

pb->addrmod « VME_ADD_MOD; 

pb->scdb.byte2 » 0; 

pb->vmeaddr * RF_ADDR (label) ; 

pb->scdb.byte4 = 24; 

pb->count - blksizfunit] ; 


pb->scdb. cmd * SC_READ; 

ms - (mode_sel *) iomem; 

pb->scdb.bytel * bunit « 5; 

DEBUG(0x201, printf ("cfattach: Getting buffer parameters. 

pb->scdb.byte2 «* 0; 

if ((res - sglcmd(xpb, device ->md_mc) ) i- 0) 

pb->scdb.byte3 » 0; /* Sector # to read */ 

res - sglcmd(xpb, device->md_mc) ; /*Try again. */ 

pb->scdb.byte4 * 1; /* # of sectors to read */ 

if (res « 0) { 

if (sglcmd(xpb, device->md_mc) ) { 

blksiz [unit] * ms->bl)clen[0] «16 

/* issue the read command and check for errors */ 

| ms->blklen[l]«8 

/* Try again... some drives take two tries on the first t 

| ms->blklen [2] ; 

if (sglcmd(xpb, device->md_mc) ) { 

> 

/* the read failed, the drive is probably not fo 

} 

printf ("The disk may not exist or be formatted. \ 

if (btarget ~ OxFE) { /* Floppy */ 

/* release memory used for disk label */ 

bzero((char *)4xpb->pb, sizeof (EXTPB) ) ; 

/* safefree ( (caddr t) label); 

bzero ((char *) iomem, sizeof (mode_sel) ) ; 

*/ 

ms * (mode_sel *) iomem; 

/* Zero the geometry. */ 

xpb->pb. targetid * btarget; 

bzero (4 geometry [device->md_unit] , sizeof (struct 
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> else { 

goto getinfo; 

/* keep minimal config */ 

> 

gp » ageometry [device->md_unit ] ; 

} 

gp->dkg ncyl - 1; 

/* read worked, see if there is a valid label on this sector */ 

gp->dkg acyl » 0; 

/* Corrpute what the checksum should be... */ 

gp->dkg ape - 0; 

cksum •» 0; 

gp->dkg nhead “1; 

for (i * 0, wp » (unsigned short *) label; i < sizeof (struct dk 1 

gp->dkg bhead <■» 0; 

cksum *wp++; 

gp->dkg nsect » 1; 

if (cksum 1- label->dkl cksum | | label->dkl magic 1- DKL MAGIC) 

gp->dkg intrlv - 1; 

#ifndef STANDALONE 

gp->dkg gapl ■» 0; 

if (DKL MAGIC l- label->dkl magic) { 

gp->dkg gap 2 - 0; 

if (btarget !- OxFE) 

} 

printf ("cfattach: No label on unit %d\n" 

if (btarget !~ OxFE) 

> else ( 

printf ( "%s%d: <Assuming: cyl *d alt %d hd %d sec 

if (btarget !« OxFE) 

gp->dkg ncyl, gp->dkg_acyl, gp->dkg_nhea 

printf ("cfattach: Bad checksum in label 


} 

goto getinfo; 

#endif 

} 

/* release memory used for disk label */ 

goodlabel - 1; 

/* safefree ( (caddr t) label); 

/* this disk has a valid label, lets see what it says */ 

*/ 

/* set the disk partition map according to the label */ 

skiplabel : 

for (i - 0; i < NDKMAP; i++) 


partitions [device->md unit] [i] - label ->dkl_map [i ] ; 

/ * Issue a mode sense for the pages of geometry. */ 


bzero ( ( char *)*xpb->pb, sizeof (EXTPB) ) ; 

/* set the geometry according to the label */ 

pb — *xpb->pb; 

gp - ageometry [device->md unit]; 

pb->id - 0; 

gp->dkg ncyl «* label~>dkl ncyl; 

pb->targetid - btarget; 

gp->dkg acyl - label->dkl acyl; 

pb->addrmod - VME ADD MOD; 

gp->dkg nhead » label->dkl nhead; 

pb->vmeaddr - RF ADDR(iomem); 

gp->dkg bhead » label->dkl bhead; 

pb->count - MEMSIZE; 

gp->dkg nsect ■> label ->dkl nsect; 

pb->scdb. cmd - SC SENMODE; 

gp->dkg intrlv - label->dkl intrlv; 

pb->scdb.bytel » bunit << 5; 

gp->dkg gapl » label->dkl gapl; 

if (btarget — OxFE) { /* Floppy? Use page 5. */ 

gp->dkg gap2 « label->dkl gap2; 

pb->scdb.byte2 = 5; 

gp->dkg ape * label->dkl ape; 

pb->scdb . by te4 - 34; 


} else { 

/* determine usable and physical sizes */ 

pb->scdb.byte2 - 4; /* Get page 4 first */ 

usable - gp->dkg ncyl * gp->dkg nsect * gp->dkg_nhead; 

pb->scdb.byte4 - 30; 

physical - usable + gp->dkg acyl * gp->dkg nsect * gp->dkg_nhead 

> 

physical += qp->dkq ape * (gp->dkg acyl + gp->dkg ncyl) ; 


#ifndef STANDALONE 

if ( 1 sglcmd (xpb, device->md me)) { /* This means it wor 

printf (”%s%d: <%s (%d/%d) >\n" , efedriver . mdr dname, device->md un 


label->dk 1 asciilabel, usable, physical); 

ms « (mode sel *) iomem; 

#endif 

/* Pull the geometry out of the pages... */ 


if (btarget — OxFE) { /* Floppy? */ 

/* release the label structure */ 

offset - (ras->blk des len - 8) ; 

/* rmf ree (iopbmap, sizeof (struct dk label), (caddr t) label);*/ 

p5 “ (page 5 *) &ms->vend uniq [of f set ] ; 



} else if (rfdinfo( index] .dev id — SEQ ACC) /* if device is tape */ 

gp “ ^geometry [device->md unit]; 

( 

gp->dkg ncyl - p5->ncyls; 

uflagon (ugeneral, unit, index); 

gp->dkg acyl * 0; 

/* release resources */ 

gp->dkg_nhead = p5->nheads; 

safefree ( (caddr_t ) xpb) ; 
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gp->dkg_bhead = 0; 

safefree ( (caddr_t) iomem) ; 

gp->dkg_nsect « p5->spt; 

return (1) ; 

gp->dkg_intrlv » 0; 

> 

gp->dkg_gapl = 0; 


gp->dkg_gap2 « 0; 

getinfo: 

goto getinfo; 

/* set up a read capacity command to find the record information */ 

> 

pb = &xpb->pb; 


bzero ( (char *)pb, sizeof (EXTPB) ) ; 

gp ** ^geometry [device->md_unit] ; 

pb->id = 0; 


pb->targetid « btarget; 

offset - (ms->blk_des_len - 8); 

pb->addrmod - VME_ADD_MOD; 

p4 - (page_4 *) & (ms->vend_uniq(of fset ] ) ; 

pb->vmeaddr * RF_ADDR (iomem) ; 

gp->dkg_ncyl = p4->ncyl_bl; 

pb->count = sizeof (read_cap); 

gp->dkg_ncyl « (gp->dkg_ncyl « 8) | p4->ncyl_b2 

pb->scdb . cmd « SC_RDCAP; 

gp->dkg_nhead - p4->nhead; 

pb->scdb.bytel = bunit « 5; 

bzero ((char *)&xpb->pb, sizeof (EXTPB) ) ; 

rc = (read_cap *) iomem; 

pb » &xpb->pb; 

bzero(rc, sizeof (read^cap) ) ; 

pb->id - 0; 

DEBUG (0x1 , printf ("cfattach; Issuing 'read capacity' An") ; ) 

pb->targetid - btarget; 

/* issue the read capacity command and check for errors */ 

pb-> addrmod - VME_ADD_MOD; 

if (sglcmd(xpb, device“>md_mc) ) { 

pb->vmeaddr « RF_ADDR (iomem) ; 

/* the read failed */ 

pb->count - MEMSIZE; 

DEBUG(0xl, printf ("cfattach: Read capacity failed. ... \n") ; ) 

pb->scdb. cmd » SC_SENMODE; 

printf ("cfattach: Read capacity failed. . . An") ; 

pb->scdb.bytel « bunit « 5; 

} else { 

pb->scdb.byte2 - 3; 

/* ok. . .now copy the relevant part. */ 

pb->sedb.byte4 = 34; 

record inf o [device->md unit] .bsize = 


(rc->blklen [0] « 24) | 

gp->dkg_gapl * 0; 

(rc->blklentl] « 16) 1 

gp->dkg_gap2 =0; 

(rc->blklen (2] « 8) | 

gp->dkg_bhead * 0; 

(rc->blklen [3] ) ; 


record inf o (device*>md unit].nblk * 

if (sglcmd (xpb, device->md_mc) ) { 

(rc->nblk [0] « 24) | 

/* Couldn't get page 3. */ 

(rc->nblk [1] « 16) | 

/* keep minimal config */ 

(rc->nblk [2] « 8) | 

gp->dkg_ncyl - 1; 

(rc->nblk [3] ) ; 

gp->dkg_apc * 0; 

record_info [device'->md_unit] . nblk++; 

gp->dkg_nhead = 1; 

if (utype [device->md_unit] 1* SEQ_ACC && ! goodlabel) { 

gp->dkg_nsect = 1; 

partitions (dev ice->md_unit ] [0] .dkl_nblk = record_inf o [de 

gp->dkg_intrlv = 1; 

partitions [device->md unit][0].dkl cylno * 0; 

goto getinfo; 

} 

> 

DEBUG (0x1, printf ("cfattach: bsize=%x nblks=%d\n". 

offset = (ms->blk_des_len - 8) ; 

record_info(device->md_unit] .bsize. 

p3 — (page_3 *) * (ms->vend_uniq( offset ]) ; 

record info[device->md unit] . nblk) ; ) 

if (p3->alttpzone 1* 0) 

) 

gp->dkg ape = p3->altspzone / p3->alttpz 

/* release resources and return */ 

else 

safefree ( (caddr_t) xpb) ; 

gp->dkg_apc » 0; 

safefree ( (caddr_t) iomem) ; 

gp->dkg_apc *= gp->dkg_apc * gp->dkg_nhead; 

return (1) ; 

gp->dkg_nsect = p3->spt; 


gp->dkg_intrlv * p3->interleave; 

> 

if (p3->alttpvol) 


gp->dkg_acyl = p3->alttpvol / gp->dkg_nh 


else 


gp->dkg_acyl * 0 ; 
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/************************************************■ 


Subroutine: cfopen 

Calling Sequence: cfopen (dev, flag) 


;**** 


if (btarget — OxFE) { 
options - 0; 

) else { 

options » rfdinfo (MINER) .unit_ops; 

} 

bsize = record_info [unit] .bsize; 


Called By: UNIX I/O System. 

Calling Parameters: 

dev: Major t minor number of device. 

flag: specifies what kind of open mode (Read, Write, 

Local Variables: 

unit : device unit . . . form dev 

partno: partition number for disk - 0 for all other 
bp: pointer to buffer header 

adapter parameter block 
pointer to mode_sel structure 
pointer to read_cap structure 


if (btarget -- OxFE) { 

if (partno >- FLPFMT) { 

printf ("cfopen: Illegal floppy device-0x%x\n" , dev); 
return ( El NVAL) ; 


/* Get the buffer for commands... */ 

1 - splx (pritospl (device->md_mc->mc_intpri) ) ; 
bp - arf sdbuf [unit] ; 
buf_f ree (dev, bp); 
splx (1) ; 

bp->b_dev « dev; 


Calls Subroutines: rfsdcmd() 

Public/Global Variables: 

rf sdreset : 1 if board reset 

rfsdbuf: local buffer header 

Description : 

This routine is called when the special file associated with 
this adapter is opened. 


************************* ***************** ****** **************************** i 


cfopen (dev, flag) 
dev_t dev; 
int flag; 

{ 

register 

register 

REGISTER 

REGISTER 

REGISTER 

REGISTER 

REGISTER 

REGISTER 

REGISTER 

REGISTER 

register 

REGISTER 

register 

register 

register 

register 

register 

REGISTER 

REGISTER 


int MINER; 
int unit; 

struct mb_device ‘device; 
byte partno; 
struct buf *bp; 

PARMBLK PB; 
mode_sel ‘ms; 
read_cap ‘rc; 
inq_data ‘inqdat; 
blk_lim ‘blklim; 
int bsize; 

byte bunit, btarget; 
int write_prot; 
int ididreserve; 
int open_index; 
int errco - 0; 
int 1; 

char ‘iomem; 
page_5 *p5; 
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‘ /‘ allocate space for iomem */ 

‘ while ((iomem « (char *) safealloc (MEMSIZE) ) — (char ‘ ) NULL) { 

* if (iomem_count) { 

* iomem_wanted - 1; 

* sleep ( (caddr_t) iiomem_wanted, PRIBIO) ; 

* } else { 

‘ printf ("cfopen: Can't allocate memory for iomem\n"); 

* DEBUG (0x100, printf ("cfopen: Can't allocate memory for 

wakeprocess (bp) ; 

‘ return (ENOMEM) ; 

/ ) 

> 

iomem_count++; 

DEBUG (2, printf ("cfopen: allocated iomem at %x\n", iomem);) 
bp- >b_un . b_addr = (caddr_t) dev; 

/* Initialize the ididreserve so that if the device cannot be */ 

/* opened we can release the unit before returning. */ 
ididreserve « 0; 

/* Issue a test unit ready command to be sure drive is ready. This ‘/ 
/* was added because the Test Unit Ready command will no longer be */ 
/‘ issued during boot (attach routine) for tape devices. If Test */ 
/* Unit Ready command completes with an error, issue command again */ 
/* to give it another chance. */ 

bze ro ( (char *)&PB, sizeof (PARMBLK) ) ; 

PB.scdb.cmd «= SC_READY; 

PB.targetid *» btarget; 

PB. scdb.bytel * bunit << 5; 

DEBUG(0x201, printf ("cfopen: Testing for device existence\n" ) ; ) 
if (rfsdcmd (&PB, device->md_mc, unit)) { 
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i 


REGISTER page_4 ‘p4; 

REGISTER page_3 *p3; 

REGISTER page_2 *p2; 

REGISTER page_l *pl; 

REGISTER page_20 *p20; 

REGISTER struct dk_geom *gp; 
int i, usable, physical; 
int offset; 
int mxbsize, mnbsize; 
int options; 

DEBUG (0x200, printf ( "cfopen : dev=%x flag=%x\n", dev, flag);) 

MINER - minor (dev) ; 

unit * rfdinfo [MINER] .dev_index; 

device -= cf drive_inf o [unit] ; 


if (unit >- NCF) { 

printf ("cfopen: Illegal unit=0x*x\n", unit); 
return (EINVAL) ; 

> 

DEBUG ( 0x2, printf ("cfopen: device %x.\n", device);) 

/* Check here for DUMMY device. If dummy device return with ok */ 
if (rfdinfo [MINER] .dev_id — DUMMY) 

{ 

DEBUG (0x100, printf ( "cfopen: opened DUMMY device\n");) 
return (0) ; 

) 

if (device **« (struct mb_device *) NULL | | *device->md_alive> ( 

DEBUG (0x2, printf ("cfopen: Unit %d not alive. \n", unit);) 
printf ("cfopen: Unit %d not alive. \n", unit); 
return (ENXIO) ; 

) 

/* Calculate the device index into the uopen array for this device */ 
if ( rfdinfo [MINER] .tag_id !« OxFE) { 

open_index - ((64 ‘ device->md_ctlr) + ((8 * rfdinfo [MINER] . tag_ 

) else { 

open_index - ((64 * device->md_ctlr) + (rfdinfo [MINER] . log_unit) 

} 

/* If the device is TAPE we return error because */ 

/* only one open of TAPE is allowed at a time. */ 

if ( (uopen [open_index] ) && (rfdinfo [MINER] .dev_id « SEQ_ACC) ) ( 

printf ("cfopen: Permission denied, device is already open\n"); 
return (EBUSY) ; 

) 

btarget - rfdinfo [MINER] .tag_id; 
bunit - rfdinfo [MINER] . log_unit; 
partno = rfdinfo [MINER] .partition; 


if (rf sdcmd(&PB, device ->md_mc, unit)) { 

DEBUG(0x201, printf ("cfopen: cannot access device\n");) 
errco - ENXIO; 
goto error; 

> 

> 

/* Issue 'Inquiry' command... is this device block or direct access? */ 

/* or what? We will have to issue this command again even though */ 

/* already done on boot because it was not done if the device is a */ 

/* tape. */ 

bzero ( (char *) &PB, sizeof (PARMBLK) ) ; 

PB.targetid - btarget; 

PB . addrmod - VME_ADD_MOD ; 

PB.vmeaddr * RF_ADDR (iomem) ; 

PB. count « sizeof (inq_data) ; 

PB.scdb.cmd = SCJENQUIRY; 

PB. scdb.bytel » bunit « 5; 

PB. scdb.byte4 - sizeof (inq_data) ; 
inqdat = (inq_data *) iomem; 
bzero((char *) inqdat, sizeof (inq_data)); 

DEBUG (0x201, printf ("cfopen: Issuing 'inquiry' command to unit %d\n", uni 
if (rfsdcmd(&PB, device->md_mc, unit)) { 

DEBUG(0x201, printf ("cfopen: Inquiry command failed\n”, bp->b_de 
errco » ENXIO; 
goto error; 

> 

utype[unit] » inqdat ->dtype; 

DEBUG(0x201, printf ( "cfopen; device is a %x utype\n", utype [device->md_u 
if (utype [unit] »- LUN_NOTPRES) { 

DEBUG (0x201, printf ("cfopen: device not present\n") ; ) 
errco - ENXIO; 
goto error; 

) 

if ((btarget i= OxFE) (utype[unit] 1= rfdinfo [MINER] . dev__id) ) { 

printf ("cfopen: Inquiry information does not match the device_wo 
errco » ENXIO; 
goto error; 

} 

/* If the device is already open then nothing more needs to 

* be done. If the device is TAPE we return error because 

* only one open of TAPE is allowed at a time, otherwise 

* open if successful. 

* For uopen tests, map partno for all disks to partno 0. 

‘/ 

if (( (rfdinfo [MINER] .devoid ■ -« DIR_ACC || rfdinfo [MINER] .dev_id « WORM 
|| (uopen[open_index] ) } { 

if ( rfdinfo [ MINER ] .dev_id -« SEQ_ACC || rfdinfo [MINER] .dev_id == 
wakeprocess (bp) ; 
safef re© ( (caddr_t) iomem) ; 
iomem_count— ; 
if (iomera_wanted) { 

iomem_w anted » 0; 
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wakeup ( (caddr t>&iomem wanted); 

) 

return (EACCES) ; 

> 

wakeprocess (bp) ; 
safefree ( (caddr_t) iomem) ; 
if (iomem_wanted) { 

iomem_w anted - 0; 

wakeup ( (caddr t)&iomem wanted); 

} 

iomem_count — ; 
return (0) ; 

) 

/* If we should reserve the unit and it's not already reserved... */ 
if (! (options & NORESERVE) ! ure served [unit] ) { 

bzero ( (char *)*PB, sizeof (PARMBLK) ) ; 

if (errco - SCSI_RESERVE (device, PB, trfdinfo[ MINER] , MINER, bp) ) { 

printf ("error occurred on SCSI_RESERVE\n" ) ; 
goto error; 

> 

if ( rfdinfo [MINER] .dev_id — SEQACC || rfdinfo [MINER] .dev id — 
ureserved[unit] |« 1; 

else 

u reserved [unit] |« (1 « partno) ; 
ididre serve - 1; 

} 

write_prot - 0; /* Assume not write protected. */ 

/* Do device specific initialization */ 

/* The dev setup for SEQ_ACC devices used to be done in */ 

/* the cfattach routine and was moved to the open routine */ 

/* at level 1.3. */ 
switch (rfdinfo [MINER] .dev_id) { 
case SEQ_ACC : 

/* Read the block limits. */ 
bzero( (char *)&PB, sizeof (PARMBLK) ) ; 

PB.targetid - btarget; 

PB. addrmod - VME_ADD_MOD ; 

PB.vmeaddr - RF_ADDR ( iomem) ; 

PB. count « 501; /* Let's not get any more than this... * 
PB.scdb.cmd - SC_RDBLKLIM; 

PB . scdb . byte 1 - bunit « 5; 

blklim - (blk_lim *) iomem; 

bzero((char *)blklim, sizeof (blk_lim) ) ; 

DEBUG (0x201, printf ( "cf open : Issuing 'read block limits' 

if (rfsdcmd(&PB, device->md_mc, unit)) { 

DEBUG (0x201, printf (" cf open : 'read block limits' 
errco « ENXIO; 
goto error; 

Nov 22 09:31 1989 cs35.c Page 36 

bzero ((char *)p5, sizeof (page_5) ) ; 
p5->page_code - 5; 

p5->page_length - 22; /* Don't count 1 

p5->dsr ~ 3000; 

p5->hd_st_dly ” 1; 

p5->on dly ** 10; 

p5->of f dly - 40; 

p5->hd_ld_dly - 1; 

/* The variable parameters */ 
if ( (FL MEDIA(rfdinfo[MINER] .unit ops) - 
p5 ->xf er_rate - 0xlF4; /* 500 k 

else 

p5->xfer rate - OxFA; /* 250 k 

p5->nheads - 2 - (FL MEDIA (rfdinfo [MINER 
if (FL_SECTS (rfdinfo [MINER] .unit_ops) <- 
printf ("cfopen: Error in floppy 
errco - EINVAL; 
goto error; 

) 

p5->nbps = (word) FL_SECTS (rfdinfo [MINER 
p5->spt - FL SPT (rfdinfo [MINER] .unit ops 
if (FL MEDIA (rfdinfo [MINER] .unit ops) — 
FL MEDIA (rfdinfo [MINER] .unit ops) — 
FL_MEDIA( rfdinfo [MINER] ,unit_ops) — 
p5->ncyls - 80; 

else if (FL_MEDIA (rfdinfo [MINER] .unit_ops 
p5->ncyls - 76; 

else 

p5->ncyls - 40; 

/* Now adjust cylinders for the number o 
if (FL RDSTP (rfdinfo [MINER] .unit ops) > 
p5->ncyls /- (FL RDSTP (rfdinfo [M 
if (FL_MEDIA (rfdinfo [MINER] ,unit_ops) <« 
p5->s_wpre “ 43; 

else 

p5->s_wpre - 255; 

/* Reduce Write Current same as Write Pr 
* for all non-AT (high density, OxlA) f 
if (FL_MEDIA ( rfdinfo [MINER] . unit_ops) — 
p5— >s rwc « 255; 

if ( ! (rfdinfo [MINER] ,unit_ops & 0S9FL0PP 
p5->ssn_s0 “1; 
p5->ssn si - 1; 

} 

/* Page 20H (Vendor unique) flopppy disk configuration * 
/* Start page 20 at the end of page 5 */ 
p20 - (page_20 *) &p5[l]; 
bzero ((char *) p20, sizeof (page_20) ) ; 
p20->page_code * 0x20; /* Fixed value*/ 
p20->page_length - 6; /* bytes */ 

/* If 0, length is 33bytes (single density) or 62 bytes (double den) */ 
p20->post_index - 0; 

/* If 0, length is 33bytes (single density) or 62 bytes (double den) */ 
p20->inter_sector - 0; 

p20->tverify =0; /* Don't verify seeks 
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> 

p20->tsteps «= (FL_RDSTP (rfdinfo [MINER] .u 


DEBUG (0x201, printf ("cfopen: Setting flop 

/* Grab the block size in case there is one. */ 

if (rfsdcmd(&PB, device->md_mc, unit)) { 

mxbsize — 0; 

DEBUG (0x201, printf ( "cfopen : can 

mxbsize - (blklim->mxblklen[0] « 16) | 

errco = ENXIO; 

(blklim->mxblklen[lj « 8) | 

goto error; 

(blklim- >mxblklen [2] ) ; 

} 

mnbsize - 0; 


mnbsize « (blklim- >mnblklen [0] « 8) | 

/* Issue a mode sense for the pages of g 

(blklim- >mnblklen [1] ) ; 

bzero ((char *)&PB, sizeof (PARMBLK) ) ; 

if (mnbsize === mxbsize) 

PB. id - 0; 

bsize - mxbsize; 

PB.targetid - btarget; 

else 

PB. addrmod * VME_ADD_MOD ; 

bsize = 0; 

PB.vmeaddr - RF ADDR(iomem); 


PB. count » MEMSIZE; 

if ( ( (options & EXABYTE) && rf sd_ex_f ixed) | | (options & 

PB.scdb.cmd = SC_SENMODE; 

bsize “ 1024; 

PB. scdb.bytel * bunit « 5; 

> 

PB. scdb.byte2 - 5; 


PB. scdb.byte4 * 34; 

DEBUG (0x201, printf ( "cf open : mnbsize**%x, mxbsize“%x\n" , mnbsize, mxbsize);) 



if ( ! rfsdcmd(6PB, device->md_mc, unit)) 

record_info[device->md_unit] .bsize - bsize; 

ms = (mode_sel *) iomem; 

record_info[device->md_unitj .nblk «• (1«28); /* Infinity 

/* Pull the geometry out of the 

partitions [device->md_unit] [0] .dkl_cylno - 0; 

offset “ (ms->blk_des_len - 8); 

partitions [device->md_unit] [0] .dkl_nblk - (1«28) ; 

p5 * (page_5 *) &ms->vend_uniq[o 

uflagof f (uwritten, unit, MINER); 

gp - ^geometry [device->md_unit] ; 

uflagof f (uonfmk, unit, MINER); 

gp->dkg_ncyl * p5->ncyls; 

/* Fall thru */ 

gp->dkg_acyl « 0; 


gp->dkg_nhead - p5->nheads; 

case DIR_ACC: 

gp->dkg_bhead -0; 

case WORMs 

gp->dkg_nsect - p5->spt; 

case RDONLYDIR_ACC: 

gp->dkg_intrlv - 0; 


gp->dkg_gapl » 0; 

DEBUG (0x201, printf ("cfopen: ops=%x\n", options);) 

gp->dkg gap2 - 0; 

/* Now let's select our options... */ 

) 

if ((! (options & N00PN_MDSEL) ) && 

) else { 

(! (options & GEN_M0DE) II (uflagtst (ugeneral , un 

/* Issue 'mode sense' command 

if (btarget — OxFE) ( /* Floppy */ 

* before issueing mode select command 

bzero ((char *)*PB, sizeof (PARMBLK) ) ; 

*/ 

bzero((char *) iomem, sizeof (mode_sel )) ; 

bzero ((char *)&PB, sizeof (PARMBLK) ) ; 

ms » (mode_se 1 *) iomem; 

ms * (mode_sel *) iomem; 

PB.targetid ■ btarget; 

bzero((char *)ms, sizeof (mode_sel) ) ; 

PB. addrmod - VME_ADD_MOD; 

PB.targetid - btarget; 

PB.vmeaddr « RF_ADDR (iomem) ; 

PB. addrmod » VME_ADD_MOD; 

PB. count = 44; 

PB.vmeaddr - RF ADDR(ms) ; 

PB . s cdb . cmd » SC_SE LMODE ; 

PB.scdb.cmd » SC_SENMODE; 

PB . scdb.bytel - bunit « 5; 

PB. scdb.bytel - (bunit « 5); 

PB . scdb. byte4 = 44; 


ms ->medi um_t ype * FL_MEDIA (rfdinfo [MINER 

if (options & EXABYTE) { 

ms->blk des len “8; 

/* 2 vendor unique parameter */ 

ms->blklen[0] “BYTE 2 (FL SECTS ( rfdinfo [MI 

PB . scdb . byte4 - 14; 

ms->blklen [1] =BYTE1(FL SECTS (rfdinfo [MI 

PB. count = 14; 

ms->blklen [2] “BYTE0 (FL_SECTS ( rfdinfo [MI 


p5 * (page_5 *) ms->vend_uniq; 

if (rfsd__ex_MX4_23) { 
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/* five vend unique */ 
PB.scdb.byte4 - 17; 

PB. count - 17; 

} 

} else { 

PB.scdb.byte4 - 12; 

PB. count - 12; 

} 

DEBUG (0x201, printf ( "cf open: Issuing 'mod 
if (rfsdcmd(&PB, device->md_mc, unit)) { 
DEBUG (0x201 , printf ("cf open : 'mo 
errco - ENXIO; 
goto error; 

> 

/* Issue 'mode select' command */ 
bzero ( (char *)aPB, size of (PARMBLK) ) ; 
PB.targetid - btarget; 

PB . addrmod - VME_ADD_MOD ; 

PB.vmeaddr - RF ADDR(iomem) ; 

PB.scdb.cmd - SC SELMODE; 

PB.scdb.bytel - (bunit « 5) ; 

ms->medium type - mdsel val [unit] . medium 
if (options & EXABYTE) { 

ms->vend_uniq[0] - rf sd_ex_optio 
ms->vend_uniq[l] - rf sd_ex_cart; 
ms->vend_uniq[2] « rfsd_ex_motio 
ms->vend_uniq[3] - rf sd_ex_recon 
ms->vend_uniq[4] - rfsd_ex_gap; 
/* 2 vendor unique parameter */ 
PB. scdb.byte4 - 14; 

PB. count - 14; 

if (rfsd_ex_MX4_23) { 

/* five vend unique */ 
PB. scdb.byte4 - 17; 

PB. count - 17; 

) 

} else { 

PB.scdb.byte4 * 12; 

PB. count - 12; 

) 

ms->byte0 » mdsel_val [unit ] .byteO; 

if (rfdinfo [MINER] .dev_id -- SEQ_ACC) ( 
/* Buffered Mode */ 
ms->byte2 - mdsel val [unit] .byte 

} 

if ( rfdinfo [MINER] .dev_id — WORM) { 

/* Enable Blank Checking */ 
ms->byte2 •* 1; 

> 

ms->blk_des_len * mdsel_val [unit] .blk_de 
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/******************************************************************************* 
* * 

* Subroutine: cf close * 

* * 

* Calling Sequence: cf close (dev, flag) * 

* dev: Major & minor number of device. * 

* flag: specifies what kind of open mode (Read, Write, both..) * 

* * 

* Called By: UNIX I/O System. * 

* * 

* Calling Parameters: * 

* * 

* Local Variables: * 

* unit: device unit... form dev * 

* lunit: logical unit * 

* bp: pointer to buffer header * 

* PB: adapter parameter block * 

* ms: pointer to mode_sel structure * 

* * 

* Calls Subroutines: rfsdcmd() * 

* * 

* Public/Global Variables: * 

* rfsdbuf: local buffer header * 

* Description: * 

* This routine is called when the special file associated with * 

* this adapter is closed. If a device is opened more than once at one * 

* time, close routine is only on the last close to the device. 

A******************************************************************************/ 

cfclose(dev, flag) 
dev_t dev; 
int flag; 

{ 

register int MINER; 
register int unit; 

REGISTER struct mb device ‘device; 

REGISTER PARMBLK PB; 

REGISTER struct buf *bp; 

REGISTER byte partno; 
register int btarget, bunit; 
register int open_index; 
int genmode ; 
int 1; 

int options; 
long a,n; 

DEBUG (0x300, printf ( "cfclose : dev=%x dflag=%x\n”, dev, flag) ; ) 

MINER - minor (dev); 
unit - rfdinfo [MINER] .dev_index; 
device - cfdrive infofunit]; 
btarget - rfdinfo [MINER] . tag id; 
bunit = rfdinfo [MINER] ,log_unit; 
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ms->density_code - mdse l_val [unit] .densi 

partno = rfdinfo [MINER] .partition; 

/* zero = all the blocks */ 

if (btarget «« OxFE) ( 

ms->nblk [0] - 0; 

options * 0; 

ms->nblk [1] - 0; 

} else { 

ms->nblk[2] * 0; 

options — rfdinfo [MINER] . unit ops; 

ms->blklen [0] - BYTE2 (bsi ze) ; 

} 

ms->blklen [1] - BYTE1 (bsi ze) ; 


ms->blklen [2] - BYTEO (bsi ze) ; 

/* Check here for DUMMY device. If dummy device return with ok */ 


if (rfdinfo [MINER] .dev id — DUMMY) 

DEBUG (0x201, printf ( "cf open: Issuing 'mod 

{ 

if (rfsdcrad(&PB, device->rod_mc, unit)) { 

DEBUG (0x100, printf ("cfclose: opened DUMMY device\n") ; ) 

DEBUG (0x201, printf ("cfopen : 'mo 

return (0) ; 

DEBUG (0x201, printf ("cf open: ops=%x\n", options);) 

} 

errco - ENXIO; 


goto error; 

/* Calculate the device index into the uopen array for this device */ 

> 

if (rfdinfo [MINER] .tag_id !~ OxFE) ( 

> 

open_index * ((64 * device->md_ctlr) + ( (8 * rfdinfo [MINER] .tag_ 

> 

) else { 

break; 

} 

open index « ((64 * device->md ctlr) + ( rfdinfo [MINER] . log unit) 

> 

if (write_prot && (flag & FWRITE) ) { 

/* 

* Do errlog if we are going to be rewinding. 

errco « EROFS; 

* Have to do errlog here, since we have 

goto error; 

* buffer busy later, and errlog will 

} 

* deadlock trying to get our own buffer. 

/* The open was successful! Set the uopen flag for this "device 

* This was put here instead of in case statement because rfsd_errlog 

partition" for disk, or "device" for tape or floppy */ 

* hangs sleeping for bp to not be free. 

uopenon (uopen, MINER, open_index) ; 

*/ 


if ( (rfdinfo [MINER] .dev id == SEQ ACC) && ! (options & NOREWIND)) 

error: 

if (options & EXABYTE) 

if (errco && ididreserve) { 

rf sd_errlog (dev) ; 

if ( rfdinfo [MINER] .dev_id =« SEQ_ACC || rfdinfo [MINER] . dev_id — 


ureserved[unit] &= -1; 

/* Wait for the buffer header to get free */ 

else 

bp = srf sdbuf [unit] ; 

ureserved[unit] ~(1 « partno) ; 

1 *= splx (pritospl (cf drive_inf o [unit] ->md_mc->mc_intpri ) ) ; 

if ( !ureserved[unit] ) { 

buff ree (dev, bp); 

DEBUG (0x201, print f ( "cfopen : release device %x\n", bp->b 

splx (1) ; 

/* Release the unit. */ 

bp->b_dev «■ dev; 

bzero ((char *)&PB, sizeof (PARMBLK) ) ; 

bp->b_un.b_addr ** (caddr_t) dev; 

if (SCSI_RELEASE (device, PB,&rfdinfo[ MINER] , MINER, bp)) { 


printf ("error occurred on SCSI RESERVE\n") ; 

switch (rfdinfo [MINER] ,dev_id) { 

} 

case DIR_ACC: 

> 

case WORM: 

} 

case RDONLYDIR_ACC: 

wakeprocess (bp) ; 

/* mark the device as not open */ 

safefree ( (caddr_t ) iomem) ; 

break; 

if (iomem_wanted) ( 


iomem_wanted * 0; 

case SEG_ACC: 

wakeup ( (caddr t)&iomem wanted); 


} 

/* write a filemark if tape openopen for writing or if tape 

iomem_count — ; 

* is open for read/write and something got written 

return (errco) ; 

if ( (flag&FWRITE) &* (uf lagtst (uwritten, unit, MINER))) { 

} 

genraode « ((! (options & GEN_MODE ) ) || (uf lagtst (ugeneral 


/* write a filemark */ 
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DEBUG (0x3, printf ( "cf close : writing filemark\n") ; ) 
k> zero ((char *>£PB, size of (PARMBLK) ) ; 

/****** 

******************************************************************** 

***** 

PB.targetid - btarget; 

* 


* 

PB. scdb . cmd - SC WFM; 

* 

Subroutine: cf strategy 

* 

PB. scdb . bytel - bunit « 5; 

* 


* 

if ((options & (ONEFILEMARK | ONEFM) ) || (genmode) 

* 

Calling Sequence: cf strategy (bp) * 


PB. scdb. byte 4 - 1; 

★ 


* 

else 

* 

Called By: UNIX I/O System. 

* 

PB. scdb.byte4 - 2; /* 2 file marks */ 

* 


* 

/* allow use of "short" filemarks */ 

* 

Calling Parameters: 

* 

if ((options & EXABYTE) ££ rfsd ex write short fm) 

* 

bp: Pointer to I/O request. 

* 

PB . scdb .byte5 - 0x80; 

* 


* 

if (rfsdcmd(£PB, device->md me, unit)) { 

* 

Local Variables: 

* 

printf ("cf close : cannot write filemark\n") ; 

* 

rfreg: pointer to the special registers on the adapter 

* 

goto error; 

* 

unit: device unit... form dev 

* 

} 

* 

lunit: logical unit 

* 

/* Do it again if... */ 

* 

bp: pointer to buffer header 

* 


* 

PB: adapter parameter block 

* 

if (PB. scdb.byte4 -- 1 ££ 

* 

last: last valid block on the device 

* 

1 (options & ONEFM) ££ 

* 

targetid: SCSI target ID 

* 

rfsdcmd(&PB, device->md me, unit)) { 

* 

targetunit: unit number on the SCSI target 

* 

printf ("cf close : cannot write filemark2\n") ; 

* 

nsectors: number of blocks for data transfer 

* 

goto error; 

* 

blklen: device block length 

* 

} 

* 

pb: pointer to adapter parameter block 

* 

if ( ! (options & GEN MODE) ££ 

★ 

ps: process status 

* 

(options £ NOREWIND) ££ 

* 


* 

! (options £ ONEFM) ) { 

* 

Calls Subroutines: none 

* 

/* back up over one of them */ 

* 

Public/Global Variables: 

* 

DEBUG (0x3, printf ("cf close: searching -filemark\ 

* 

cmdq: command list to issue commands to the adapter 

* 

bzero ( (char *)£PB, si zeof (PARMBLK) ) ; 

* 


* 

PB.targetid * btarget; 

it 

Description: 

* 

PB . scdb . cmd - SC SPACE; 

it 


* 

PB. scdb. by tel - bunit « 5 | SFM; 

ititititititi 

*************************★**********************************************/ 

PB. scdb.byte2 - BYTE2 (-1) ; 
PB. scdb.byte3 - BYTE1 (-1) ; 

void 



PB. scdb.byte4 - BYTE0 (-1) ; 

cf strategy (bp) 


if ( rf sdcmd (£PB, device->md me, unit)) { 

REGISTER struct buf *bp; 


printf ("cfclose: cannot find -filemark\n 
goto error; 

> 

> 

{ 

register int MINER; 
register int unit; 

REGISTER struct mb device ‘device; 


} 


REGISTER RF35REG *rfreg; 
REGISTER byte partno; 


for(n * 1; n < 20000; n - n + 1) { /* Delay for search filemark 


REGISTER dword last; 


a - n; 

} 


REGISTER byte btarget, bunit; 
REGISTER struct dk_map *partp; 
struct dk geom *gp; 


/* rewind the tape if no rewind option not set */ 


dword nsectors; 

dword blklen; 


if ( ! (options £ NOREWIND)) { 


PARMBLK *pb; 


uflagon (ugeneral, unit, MINER); 


dword ps; 


DELAY (1000000) ; 


int mbinfo, mbwaitflag; 


DEBUG (0x3, printf ("cfclose: rewinding tape\n") ; ) 
bzero ( (char *)£PB, sizeof (PARMBLK) ) ; 


int options; 


PB.targetid = btarget; 


DEBUG (0x400, printf ( "cf strategy : dev=%x flags=%x bn=%x cc=%x ma~%x\n",b 
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PB. scdb . cmd - SC_REWIND; 

PB. scdb .bytel - bunit « 5; 


MINER - minor (bp->b dev); 


if (rfsdcmd(£PB, device->md_mc, unit)) ( 


unit « rfdinfo [MINER] .dev index; 


printf ("cfclose : cannot rewind tape\n"); 


device * cfdrive info[unit]; 


goto error; 

> 


rfreg » (RF35REG *) device->md_mc->mc_addr ; 
if (rfdinfo [MINER] .tag id OxFE) { 


} 


options “ 0; 


} 


} else { 




options = rfdinfo [MINER] .unit ops; 


error: 


} 


if (rfdinfo (MINER] .dev_id — SEQ_ACC || rfdinfo [MINER] .dev_id — PRN || 


if (rfdinfo [MINER] .dev id == DUMMY) 


ureserved [unit] £- ~1; 


{ 


else 


printf ("cfstrategy: cf%x is a DUMMY device and cannot be written 

ureserved [unit] £- ~(1 « partno) ; 


} 


if ( (ureserved [unit] ££ ((options £ NORESERVE)) { 


if (bp->b bcount <« 0) { 


/* Release the unit */ 


iodone (bp) ; 


bzero ((char *)£PB, sizeof (PARMBLK) ) ; 

if ( SCSI_RELEASE (devi ce , PB, arfdinf o [MINER] , MINER, bp) ) { 


return; 

} 


DEBUG (0x201, print f ( "cfclose : release device %x failed\n 

} 

} 


partno = rfdinfo [MINER] .partition; 
btarget = rfdinfo [MINER] . tag_id; 
bunit = rfdinfo [MINER] . log unit; 


/* release the system buffer and wakeup any process 


gp * ageometry [device->md unit]; 


* waiting for the buffer 
*/ 


if (btarget =« OxFE) { /* FLOPPY */ 


wakeprocess (bp) ; 


partno » 0; 

partp =* £partitions [unit] [partno] ; 


/* mark the device as not open */ 


partp->dkl nblk * record inf o (unit ]. nblk; 


uopenoff (uopen, MINER, open index); 


) else 


> 


partp * £partitions [unit] [partno] ; 




switch (rfdinfo [MINER] .dev id) { 




case DIR_ACC: 

case WORM: 

case RDONLYDIR ACC: 




blklen «* record_info[unit] .bsize; 
last «= record_info[unit] .nblk; 
bp->b_bn = bp->b_blkno; 

bp->b bn += (partp->dkl cylno * gp->dkg nsect * gp 
if (blklen) { 

->dkg_ 



bp->b_bn - (bp->b_bn * DEV_BSIZE) / blklen 
/* Going past the end of the partition? */ 
if (bp->b blkno >= partp->dkl nblk | | 




(bp->b blkno + (bp->b bcount / blklen) 

> par 



printf ("ERROR - PAST PARTITIONS" ) 
bp->b_flags |« B_ERROR; 
bp->b_error = EIO; 
iodone (bp) ; 




return; 

} 




} 

break; 




case SEQ ACC : 




blklen * record_info[unit] .bsize; 
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last - record inf o [unit] . nblk; 

pb->scdb. cmd - (bp->b flags « B READ) ? SC READ : SC WRITE; 

bp->b bn - 0; 

if (rfdinfo [MINER] .dev id — SEQ ACC) { 

break; 

pb->scdb.bytel « (bunit « 5) | (BYTE2 (bp->b bn) & OxlF) ; 

default : 

if (blklen) 

goto error; 

pb->scdb.bytel | = 1; /* Fixed */ 

> 

pb->scdb.byte2 « BYTE2 (nsectors) ; 


pb->scdb.byte3 * BYTE1 (nsectors) ; 

DEBUG (0x4 00, 

pb->scdb.byte4 * BYTE0 (nsectors) ; 

printf ("cf strategy : last«%d\n", last); 

} else { 

) 

pb->scdb.bytel - (bunit « 5) | (BYTE2 (bp->b bn) & OxlF); 

/* If trying to read next to the last block then 

pb->scdb.byte2 * BYTE1 (bp->b bn); 

* set residual count to transfer count and return. 

pb->scdb.byte3 - BYTE0 (bp->b bn); 

* If trying to do any other transfers outside the 

pb->scdb.byte4 - nsectors; 

* valid block range then set the error and return. 

) 

if (bp->b blkno < 0 | | bp->b blkno >- last) { 

DEBUG (0x4 03, 

if (bp->b blkno — last && bp->b flags a B READ) 

blkpr (pb, sizeof (PARMBLK) ) ; 

bp->b resid - bp->b bcount; 

printf ("cfstrategy : issuing channel attention\n") ; 

else { 

) 

bp->b resid - bp->b bcount; 


bp->b flags | - B ERROR; 

#if NPBMASK 

bp->b error - EIO; 

cmdq[device->md ctlr]->pbin - (cmdq[device->md ctlr] ->pbin + 1) * NPBMAS 

) 

#else 

iodone (bp) ; 

cmdq[device->md ctlr]->pbin - (cmdq [device ->md ctlr]->pbin + 1) % NPB; 

return; 

#endi f NPBMASK 

) 

rfreg->at tent ion - SWAB(l); 


/*printf ("cfstrategy : dev=%x flags-%x bn«%x cc-%x ma-%x bufsz«%x resid- 

/* Make sure the I/O count is multiple of device block size 


* and calculate the number of blocks to be transfered 

splx(ps) ; 

* This only applies if blklen is set. Otherwise transfer size is 

return; 

* in bytes. This is mainly for variable length tape blocks. 


*/ 

error: /* Cannot process the request. Set the user error flag and return */ 

DEBUG (0x400, 

bp->b flags |» B ERROR; 

printf ("cfstrategy: blklen«%d\n" , blklen); 

bp->b error - EIO; 

) 

iodone (bp) ; 

if (blklen) ( 

return; 

if ( (bp->b bcount/blklen*blklen) !- bp->b bcount) { 

> 

printf ("RF3500: dev %x, I/O count %x device block size 


printf ( "RF3500 : dev %x, I/O not multiple of device block 


goto error; 


nsectors » bp->b bcount / blklen; 


} else 


nsectors - bp->b_bcount; /* really: nbytes */ 


/* return EOF if prev read was short read before FMK */ 


if (uflagtst (uonEOF, unit, MINER)) { 


uflagoff (uonEOF, unit, MINER); /* clears fig on write */ 


if ( (options & EXABYTE) && (bp->b flags & B READ) ) { 


bp->b resid - bp->b bcount; /* zero byte read */ 


bp->b error — 0; 


iodone (bp) ; 


return; 

} 

) 
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/* Flag the tape as being written */ 


if (rfdinfo [MINER] .dev_id -- SEQ_ACC) { 

/******************************************************************************* 

uflagoff (ugeneral, unit, MINER); 

* * 

if ( (bp->b_f lags & B_READ) == 0) { 

* Subroutine: cfintr * 

uf lagon (uwritten, unit, MINER); 

* * 

) else { 

* Calling Sequence: cfintr () * 

uflagoff (uwritten, unit, MINER); 

* * 

} 

* Called By: Unix interrupt service mechanism * 

} 

* Calling Parameters: none * 

if (bp != &rfsdbuf [unit] ) ( 

* * 

/* We'll get called on the interrupt service stack if called */ 

* Local Variables: * 

/* from the network disk interface. */ 

* sb: pointer to the status block in 'cmdq' * 

#ifndef SunOS4 

* bp: pointer to the buffer header * 

mbwaitf lag - intsvc() ? MB_C ANTWAI T : 0; 

* error: error in command execution * 

/* map memory to main bus */ 

* * 

bp->b_saddr -0; 

* Calls Subroutines: none * 

rttoinfo * mbsetup (device->md_hd, bp, mbwaitf lag) ; 

* * 

if (mbwaitflag && rttoinfo -« 0) { 

* Public/Global Variables: * 

timeout (cfstrategy, bp, hz) ; 

* cmdq: command list to issue commands to the adapter * 

return; 

* * 

} 

* Description: * 

#else 

* * 

bp->b_saddr - 0; 

A******************************************************************************/ 

mbinfo - mbsetup (device->md hd, bp, 0); 


#endif 

cfintr (ctlr) 

/* save mbinfo for release in rfintr */ 

{ 

bp->b_mbinfo - (struct buf *) mbinfo; 

REGISTER STATBLK *sb; 

bp->b md hd ■ (struct buf *) device->md hd; 

REGISTER struct buf *bp; 

) 

REGISTER byte error - 0; 


register int s; 

ps - splx(pritospl (device->md_mc->mc_intpri) ) ; 

REGISTER long resid; 


REGISTER struct mb device *device; 

/* -Point to the parameter block in the command list 

register int MINER; 

* -Set up the parameter block 

register int unit; 

* -Issue the command to the controller 

int blklen; 

*/ 

int leotflag - 0; 

#if NPBMASK 

int a; 

while ( ( (cmdq[device->md_ctlr] ->pbin + 1) & NPBMASK) -- cmdq [device->md_ 

byte target_id; 

#else 

int cindex; 

while ( (cmdq[device->md ctlr]->pbin + 1) % NPB « cmdq[device->md ctlr]- 

int options; 

#endif NPBMASK 


{ 

DEBUG (0x500, printf ( "cfintr: \n" ) ; ) 

DEBUG(0x402, printf ( "cfstrategy : command list full\n”);) 


pb_wanted [device->md_ctlr] = 1; 

/* process interrupts on all controllers */ 

sleep ( (caddr_t) spb_wanted[device->md_ctlr] , PRIBIO) ; 

for (cindex - 0; cindex < NCFC; ) { 

DEBUG(0x402, printf ( "cfstrategy : pbin 0x%x\n" , cmdq[device->md__ctlr] ->pbi 

error — 0; 

pb = & cmdq [ device ->md_ctlr] ->pblist [cmdq [device->md_ctlr] ->pbin] ; 

/* if no interrupt pending, go on to the next controller 


* by incrementing the controller index (cindex) */ 

bzero( (char *)pb, sizeof (PARMBLK) ) ; 

if ( (cmdq [cindex] — (CMDLIST *> NULL) || (cmdq [cindex] ->sbin — cmdq 

pb->id = (dword)bp; 

cindex++; 

pb->targetid - btarget; 

} else { 

pb->addrmod - VME_ADD_MOD; 


pb->vmeaddr - MBI_ADDR (rribinf o) ; 

/* If some process is sleeping on command list wake him up */ 

pb->count * bp->b_bcount; 

if (pb_w anted [cindex] ) { 
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pb_wanted [cindex] - 0; 

wakeup ( ( caddr t)apb wanted[cindex] ) ; 

} 

/* Process all the status blocks In the status queue 
* one by one. 

*/ 

while (cmdq[cindex] ->sbin !« cmdq [cindex] ->sbout) { 

/* point to the status block */ 

sb - acmdq[cindex] ->sblist [cmdq [cindex] ->sbout] ; 

#if NSBMASK 

cmdq [ cindex] ->sbout - (cmdq[cindex] ->sbout + 1) a NSBMASK; 

#else 

cmdq [cindex] ->sbout - (cmdq[cindex] ->sbout + 1) % NSB; 

#endif NSBMASK 

/* get buffer address from the id field of the status blk */ 
bp - (struct buf *)sb->id; 

MINER - minor (bp->b dev) ; 
unit - rfdinfo [MINER] .dev index; 
if (rfdinfo [MINER] .tag_id — OxFE) { 
options » 0; 

} else { 

options - rfdinfo [MINER] .unit ops; 

> 

if (PRINT TARGET ID) { 

targe t_id - rfdinfo [MINER] . tag id; 

) else ( 

target id - unit; 

> 

device - cfdrive_info [unit] ; 

blklen “ record_inf o [device->md_unit] .bsize; 

resid - 0; /* Assume it all got there. */ 

/* Errors! ! ! */ 
error - sb->error; 

if (rfsd_pr sense & 02) { 
printf ("cf : dbg: "); 
blkpr (sb, sizeof (STATBLK) ) ; 

) 

/* If the continued flag isn't set, get the information out of the status 
block. This information can be overridden if we have retries at things, 
but since most of the critical information is for tape devices (the 
residual count, for example) the normal case is that a single extended 
status block will finish the operation. */ 

if ( ! (sb->f lags £ ST_CON) ) { 

/* If a soft error has occurred, scsi sense key » 1 */ 

/* print out the status block. */ 
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bp->b_f lags |- B_ERROR; 
break; 
case BLANK: 
error «■ 0; 

bp->b_f lags |- B_ERR0R; 
bp->b_error « EIO; 
break; 

case NOSENSE: 

if (sb->scsi flags a FM) { 

/* only set EOF pending if rd-ignore fsr/bsr */ 
if (bp — arfsdbuf [unit] ) { 
error « resid *0; 
break; 

} 

uf lagon (uonfmk, unit, MINER); 

/* another filemark flag to make reads work 
uf lagon (uonEOF, unit, MINER); 
if (sb->class a ADVALID) { 
if (blklen) { 

resid - ( ( (sb->infob3 « 24) | (sb->in 

} else { 

resid « (sb->infob3 « 24) | (sb->info 

> 

> 

error *» 0; 
break; 

) 

/* LEOT check */ 
if (options a EXABYTE) { 

if ( (sb->scsif lags a EOM) ) { 

/* maybe spaced to EOT or bksp to BOT */ 
/* 

* another check like ILI will 

* also post EOM if after the 

* LEOT. ILI happens on reads, 

* LEOT only on writes. 

*/ 

if (bp != arfsdbuf [unit] aa 
(sb->scsif lags a ILI) aa 
(bp->b_f lags a B_READ) ) 
goto ili; 

/* 

* Note: we stuff SCSI cmd in b_resid 

* If special buf, we probably 

* spaced off end of tape. 

* allow WEOF to go thru. . 

* It will be ok., but will 

* take an LEOT check on every 

* OP, but EOF will be written. 

* for MX 4$23 and later. — ghg 
*/ 

if (bp «= arfsdbuf [unit ] ) { 

if (bp->b resid «=» SC WFM | | 
bp->b_resid — SC_SENSE) 
error =0; 
else 
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if (sb->f lags & ST_SOFT) { 

error = EIO; 

printf ("cfintr: rf3500 soft error\n"); 

bre ak; 

blkpr (sb, sizeof (STATBLK) ) ; 

> 

) 

if (sb-> class a ADVALID) { 


if (blklen) { 

DEBUG (0x501, 

resid = ( ( (sb->infob3 « 24) | (sb- 

printf ( "cfintr: sbout » %xH\n" , cmdq [cindex] ->sbout) ; 

} else { 

blkpr (sb, sizeof (STATBLK) ) ; 
) 

resid = (sb->infob3 « 24) | (sb->i 


} 

/* handle "bug" in Exabyte resid at LEOT in var mode */ 

if (error) ( 

} else ( 


resid=0; /* prob var reclen */ 

if (rfsd_pr_sense & 01) { 

/* Exabyte - 

printf ("cf: dbge: "); 

* Drives built or upgraded around 4/21/88 

blkpr (sb, sizeof (STATBLK) ) ; 

* appear to exhibit strange behavior when 

> 

* hitting LEOT in var blk. Most of the time.. 

resid - bp->b bcount; /* Assume nothing got there. */ 

* ADVALID is not set, and infob [3456] are 

if (error -- EE_SCSIERR) { 

* 0x00 Oxff Oxff Oxff . Record does not 

/* Look at the SCSI status */ 

* need to be rewritten for this. Rarely, 

if ( (sb->scsistat a STATMASK) « CHECK COND) ( 

* ADVALID is not set and infob [345 6] are 

switch (sb->scsi flags a SENSEMASK) ( 

* set to 0x00 0x00 0x00 0x00. . and the 

case MISCOMPARE: 

* just issued write needs to be issued 

bp->b flags |« B ERROR; 

* again, infob [34 56] should be meaningless 

if (sb->class a ADVALID) { 

* if ADVALID is not set. — ghg 06/19/88. 

if (blklen) { 

* This still happens on 01/07/89. MX 4$23 

resid * ( ( (sb->infob3 « 24) | (sb->infob 

* f i rmwa re . — ghg 

) else ( 

*/ 

if (blklen « 0 aa 

resid - (sb->infob3 « 24) | (sb->infob4 

sb->infob3 »» 0 a a 


sb->infob4 »» 0 a a 

} 

sb->infob5 -* o a a 

> 

sb->infob6 « 0) 

error ”0; 

resid - bp->b bcount; 

break; 


case UNIT ATTEN: 

} 

bp->b_f lags |= B_ERROR; 

if (rfsdjpr leot) 

/* tape was chaged, clear errlog */ 

printf ("exabyte :%d hit LEOT WARNING (2 

kb_xfer [unit] - 0; 

error*0; 

lastop [unit] « UNDEF ; 

break; 

error - 0; 

} 

break; 

} 

case RECOVERED: 


i f ( PRINT_RECOV_ERRORS ) { 

ili: 

printf ("RF3500: dev %x (unit %x) recover 

/* If we have an ILI bit, OR if this isn't a 

if ( ! PRINT_SB_HEADER) ( 

read/write and we have an EOM, clear the 

blkpr (((byte *) sb) + 8, sizeof ( 

error info. */ 

} else { 

if ( (sb->scsiflags a ILI) || ( (sb->id «« (dword 

blkpr (sb, sizeof (STATBLK) ) ; 

if (sb->class a ADVALID) { 

} 

if (blklen) { 

) 

resid = ( ( (sb->infob3 « 24) | (sb->in 

resid * 0; 


error = 0; 

} else { 

break; 

resid * (sb->infob3 « 24 ) | (sb->info 

case PROTECTED: 

/* 

error - 0; 

* If reading in var mode, a record 

bp->b_error *= EROFS; 

* longer than your buffer, you will 
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* (correctly) take In ILI. Exabyte 

* Seta resld < 0 If record was longer 

* than user buffer. Correct Unix 

* operation is to silently truncate 

* the record. 

*/ 

if (resid < 0) 

resid « 0; 

) 

) 

error « 0; 
break; 

> 

default : 

printf ("RF3500 : dev %x (unit %x) , SCSI sense ke 
break; 

} 

if (PRINT RECOV ERRORS || 1 ( (sb->scsif lags t SENSEM 

blkpr (sb, sizeof (STATBLK) ) ; 

) 

) else if ( (sb->scsistat a STATMASK) ~ DEVICE_BUSY) 
printf ("RF3500: dev %x (unit %x) , SCSI device busy 
) else { 

printf ("RF3500: dev %x (unit %x) , unknown SCSI sta 

) 

> 

else if (error < EE_FRMERR> 

printf ("RF3500 : dev %x (unit %x) , adapter error %x, % 

else 

printf ("RF3500: dev %x (unit %x) , adapter error %x, i 
} else { 

if (bp->b_error) { /* if old error */ 

printf ("RF3500: dev %x (unit %x) error cleared by 

) 

bp->b error - 0; 
bp->b flags a- ~B ERROR; 

> 

/* print out the status block if error */ 
if (error) ( 

if (error — EE SCSIERR && tPRINT SB HEADER) { 
blkpr ( ( (byte *) sb) + 8, sizeof (STATBLK) - 8) ; 

) else { 

blkpr (sb, sizeof (STATBLK) ) ; 

> 

) 

if ((options a EXABYTE) aa resid !« bp->b bcount) ( 
if (bp i- arfsdbuf [unit] aa 

(resid < 0 | | resid > bp->b_bcount) ) { 
printf ("bogus resid %d\n", resid); 
resid - bp->b bcount; 

> 

} 

Nov 22 09:31 1989 cs35.c Page 56 

/******************************************************************************* 

* Subroutine: cfread a cfwrite * 

* * 

* Calling Sequence: cfread (dev) or cfwrite (dev) * 

* * 

* Called By: UNIX I/O System. . .this provides the Raw interface. * 

* * 

* Calling Parameters: * 

* dev: Major a Minor of device to perform I/O on. * 

* * 

* Local Variables: * 

* * 

* Calls Subroutines: cfstrategy (via physio) * 

* * 

* Public/Global Variables: * 

* * 

* Description: * 

* We provide the Raw I/O interface for UNIX ... still, UNIX does * 

* practically all of the work for us. We do a sanity check on * 

* the drive unit. * 

* * 

************** ************************************ ***************************** / 

cfread (dev, uio) 
dev_t dev; 
struct uio *uio; 

( 

int MINER; 
int unit; 

int status, resid; 
int options; 

DEBUG (0x500, printf ( "cfread: \n" ) ; ) 

MINER ” minor (dev); 
unit - rfdinfo [MINER] .dev index; 
if (rfdinfo [MINER] .tag_id == OxFE) ( 
options = 0; 

) else { 

options = rfdinfo [MINER] . unit ops; 

> 

/* If dummy device, return an error. Dummy device can't be 
* read from. 

*/ 

if (rfdinfo [MINER] .dev id == DUMMY) 

< 

printf ("read: cf%x is a DUMMY device and cannot be read from\n", 
return (ENXIO) ; 

} 

if (unit >» NCF) 

return (ENXIO) ; 
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if (bp i- arfsdbuf [unit] aa resid =» bp->b_bcount) ( 

if (status = chk_uio(dev, uio) ) { 

/* read filemark in a read by itself */ 

return (status) ; 

uflagoff (uonEOF, unit, MINER); 

} 

) 

if (options & EXABYTE) { 


if (lastop [unit] == WRITE) 


rfsd_errlog(dev) ; 

if (bp “ arfsdbuf [unit] ) { 

lastop [unit] = READ; 

bp->b error - error; 

resid = uio->uio resid; 

} else { 

) 

if (error) ( 

status=physio( cfstrategy, &rrfsdbuf [unit] , dev, B READ, minphys, uio); 

bp->b_resid = bp->b_bcount; 

if (status « 0 && options & EXABYTE) { 

bp->b_error = EIO; 

if (rf sd__pr_errlog & 0x8) 

bp->b flags |« B ERROR; 

printf ("cfread: %d kbytes read\n", (resid - uio->uio_resid + 1023) / 1024); 

} else { 

kb xferfunit] += (resid - uio->uio resid + 1023) / 1024; 

bp->b resid = resid; 

> 

> 

> 

return (status) ; 

} 

) else ( 

cfwrite (dev, uio) 


dev_t dev; 

/* If this IS a continued block, just print it out, since the sense info 

struct uio *uio; 

has already been sent. Note that the only time we should see this 

{ 

information is on an error or a retry, so no test is required to 

register int MINER; 

see if we have an error. 

register int unit; 


REGISTER struct mb_device *device; 

*/ 

REGISTER struct buf *bp; 


int error; 

if (sb->error -- EE_SCSIERR aa ! PRINT_SB_HEADER) { 

int status; 

printf ( "RF3500 : sense code %x from unit %x. Sense data: 

int options; 

blkpr ( ( (byte *) sb) + 8, sizeof (STATBLK) - 8) ; 


) else ( 

DEBUG (0x500, printf ( "cfwrite : \n") ; ) 

printf ( "RF3500 : additional sense bytes received for unit 


blkpr (sb, sizeof (STATBLK) ) ; 

MINER * minor(dev); 

} 

unit - rfdinfo [MINER] .dev_index; 

} 

device = cfdrive info[unit]; 


if (rfdinfo [MINER] .tag_id == OxFE) { 

/* If the command is now complete (ST_CC set), then do the 

options = 0; 

final processing. 

} else { 

*/ 

options * rfdinfo [MINER] .unit ops; 

) 

if (sb->flags a ST_CC) ( 

/* If dummy device, return an error. Dummy device can't be 


* written to. 

if (bp ~ arfsdbuf [unit] ) { 

*/ 

wakeup ( abp->b_un .b_addr) ; 

if (rfdinfo [MINER] .dev id == DUMMY) 

) else { 

{ 

mbrelse (bp->b_md_hd, abp->b_mbinfo) ; 

printf ("cfwrite : cf%x is a DUMMY device and cannot be written to 

iodone(bp); 

} 

return (ENXIO) ; 

) 

> 

) /* end of while loop */ 

if (unit >“ NCF) { 

} /* end of if /else loop checking that sbin !* sbout */ 

printf ("UNIT = %x, NCF * %x \n", unit, NCF) ; 

} /* end of for loop (for each controller in system) */ 

return (ENXIO) ; 


if (status » chk_uio(dev, uio)}( 


return (status) ; 
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} 

if (options t EXABYTE) { 

if (lastop[unit ] -■ READ) 
rfsd_errlog(dev) ; 
lastop [unit] - WRITE; 
if (rfsd__pr_errlog t 0x8) 

printf ("cf write: %d kbytes written\n", (uio->uio_resid + 1023) / 1024); 

kb_xfer [unit] +- (uio->uio_resid + 1023) / 1024; 

} 


******************************************************* 
Subroutine: cfioctl 

Calling Sequence: cfioctl (dev, cmd, addr, flag) 

Called By: UNIX I/O System 

Calling Parameters: 


} 


/* kludge for Exabyte LEOT */ 

error « physio (cf strategy, irrfsdbuf [unit] , dev, B_WRITE, minphys, uio); 
/* stupid LEOT. . restart aborted write */ 
if (options & EXABYTE) { 

bp - irrfsdbuf [unit] ; 

if (error — 0 a bp->b_resid) { 

uio->uio_iov->iov_base +~ (bp->b_bcount - bp->b_resid) ; 
/* iov_len already adj in physio. . */ 
error - physio (cfstrategy, trrfsdbuf [unit] , 
dev, B_WRITE, minphys, uio); 


> 


} 

return (error) ; 


static int 

chk_uio(dev, 

dev_t 

struct uio 

{ 


uio) 

dev; 

*uio; 

i, unit, 
iovec 


int 

struct 
int MINER; 


blklen, 

*iov; 


extra; 


Local Variable 
unit: 
lunit : 
bp: 
pb: 

level : 


device unit... form dev 
logical unit 

pointer to buffer header 
pointer to adapter parameter block 
debug level 
interleave: format interleave 
lba: logical block address 

process status 


Calls Subroutines: 


rfsdcmd 


Public/Global Variables: 
rfsddbg: 
rfsdbuf : 


debug level 

local buffer header 


* Description: * 

* This routine provides the capability of doing operations that * 

* are out of the ordinary. * 

* * 

* NOTE: ioctl's are limited to the super user. * 

* * 
*******************************************************************************/ 


MINER - minor (dev); 

unit « rfdinfo [MINER] .dev_index; 


switch (utype [unit] ) ( 
case DIR_ACC : 
case WORM: 
case RDONLYDIR_ACC : 

blklen - record_info [unit] .bsize; 

if (blklen — 0) ( 

return (ENXIO) ; 

} 

if (uio->uio_off set % blklen) { 

return (EINVAL) ; /* must start on block boundary * 

} 

extra - 0; 

for(iov - 4uio->uio_iov [i *0]; i < uio->uio_iovcnt; i++, 
extra « (extra + iov->iov_len) % blklen; 

if (extra) { 

return (EINVAL) ; /* must end on block boundary */ 

} 


} 
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/ 


iov++) 


cfioctl (dev, cmd, 
dev_t dev; 
caddr_t addr; 

{ 

register 

register 

REGISTER 

REGISTER 

REGISTER 

REGISTER 

REGISTER 

REGISTER 

REGISTER 

REGISTER 

REGISTER 

REGISTER 

REGISTER 

REGISTER 

REGISTER 

REGISTER 

register 


addr, flag) 


int MINER; 
int unit; 

struct mfo_device *device; 
PARMBLK PB, *pb; 
struct buf *bp; 
struct mtop *mtop; 
struct mtget *mtgetp; 
RF35REG *rf; 

UOPPB *upb; 

GOP TP B *gopt; 

EXTPB *xpb; 

CMDLIST *cmdptr; 
format *fmt; 
def_list *def_lst; 
mode_sel *ms; 
inq_data *inqdat; 
int open_idx_base; 
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> 


return (0) ; 


/* all other combinations are ok */ 


SETUPPB * setup; 
page_3 *pg3; 
page_4 *pg4 ; 
dword level; 
dword interleave; 
dword lba; 
int ps; 

register int errco, offset; 

REGISTER caddr_t iomem; 

byte bunit; 

register int ctlr; 

struct dk_info information; 

struct dk_vfy *vreq; 

struct dk_mapr *mreq; 

struct defect_list *deflp; 

de f_list * defist; 

struct dk_map xpart; 

struct vec *vp; 

read_cap *rc; 

int partno; 

int options; 

int timer; 

int i; 

int good_deflist; 
byte def_list_byte = 0; 


DEBUG (0x700, 

printf ("cfioctl : dev %x cmd %c/%d 

dev, (cmd»8) & OxFF, 


) 


addr 

cmd 


%x flag %x\n", 

& OxFF, addr, flag) ; 


MINER * minor (dev); 
unit ■» rfdinfo [MINER] .dev_index; 
mtop » (struct mtop *) addr; 
partno = rfdinfo[MINER] .partition; 
bunit * rfdinf o [MINER] . log_unit; 

if (rfdinfo [MINER] .tag_id == OxFE) { 
options = 0; 

} else { 

options ** rfdinf o [MINER] .unit_ops; 

) 

device * cfdrive_inf o [unit] ; 

if (device =* (struct mb_device *) NULL | | !device->md_alive) { 
printf ("cfioctl : Unit %d not alive. \n", unit); 
return (ENXIO) ; 

) 


ctlr = device->md_ctlr; 

rf = (RF35REG *) device->md_mc->mc_addr; 

/* You may want to remove this test if you want to allow normal 
* users to do ioctl's on disks, 

*/ 

if (utype [unit] !« SEQ_ACC && isuserO) { 
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return (EPERM) ; 

} 

return (0) ; 


case RFIOCIDENT: /* identify */ 

/* allocate apace for miscellaneous command information. */ 


while ((iomem- (char * ) safe alloc (MEMSIZE) ) — (char *)NULL) { 

safef ree ( (caddr t) iomem); 

if(iomem count) { 

iomem count--; 

iomem wanted - 1; 

if (iomem wanted) { 

sleep ( ( caddr t)&iomem wanted, PRIBIO) ; 

iomem wanted = 0; 

) else { 

wakeup ( (caddr t)siomera wanted); 

DEBUG (0x100, printf ("cfioctl : Can't allocate memory for 

} 

return (ENOMEM) ; 

♦(RETID * ) addr - idstat [ctlr] ; 

> 

return (0) ; 

iomem count ++; 

case RFIOC RESET : /♦ Reset the Adapter ♦/ 

DEBUG (0x2, printf ( "cfioctl : allocated iomem at %x\n", iomem);) 



safef ree ( (caddr t) iomem); 

bzero ( (char *)fcPB, size of (PARMBLK) ) ; 

iomem count--; 

PB.id - (dword) srfsdbuf [unit] ; 

if (iomem wanted) { 


iomem wanted ” 0; 

/* rewind on target 1 didnt wor)c without this — ghg */ 

wakeup ( (caddr t)iiomem wanted); 

PB.targetid - rfdinfo [MINER] .tag_id; 

> 

/♦ Execute device independent commands ♦/ 

/* Reset controller and check if it exists */ 

switch (end) { 

if (pokec ( (char *) &rf->reset, 1) 1- 0) { 

case RFIOCGTARGET: 

/* it3 not there */ 

saf ef ree ( ( caddr_t) iomem) ; 

DEBUG (0x1, printf ("cf probe : no controller present at %x\ 

iomem count — ; 

return (EIO) ; 

if (iomem wanted) { 

) 

iomem wanted - 0; 


wakeup ( (caddr t)siomem wanted); 

/* Wait for reset to complete */ 

> 

timer “ 0; 

((target *)addr)->id “ rfdinfo [MINER] .tag id; 

while ( (rf->status & SWAB (STATRST) ) 1- SWAB (RESETDONE) ) 

((target *) addr) ->unit - rfdinfo [MINER] . log unit; 

#ifdef MAXWAIT 

return (0) ; 

if ( ++timer > MAXWAIT) { 

case DKIOCGGEOM: /* Get drive configuration */ 

printf ( "cfioctl : Cannot reset controller: status 

saf ef ree ( (caddr t) iomem) ; 

return (EIO) ; 

iomem count — ; 

) 

if (iomem wanted) { 

♦else MAXWAIT 

iomem wanted - 0; 


wakeup ( (caddr_t) &iomero_w anted) ; 

#endif MAXWAIT 

* (struct dk geom *)addr *= geometry [unit] ; 

if (RFSD RESET DELAY) { 

return (0) ; 



printf ("Waiting %d second%s for SCSI bus reset completio 

case DKIOCINFO: /* Get information */ 

DELAY (RFSD_RESET_DELAY * 1000000); 

saf ef ree ( ( caddr t) iomem) ; 

> 

if (rf sdetype [ctlr] != STATRF3500) { 

iomem count — ; 

return (0) ; 

if (iomem wanted) { 

} 

iomem wanted = 0; 


wakeup ( (caddr t)Siomem wanted); 

printf ("Clear ou flags that will no longer be valid\n">; 

> 

/* Clear out various flags that will no longer be valid */ 

information . dXi ctlr - (int) (scfcontroller info [ ctlr] ->mc addr) 


inf ormation.dXi unit - device->md unit; 

/* Calculate the device index base for the devices on this 

inf ormation.dXi ctype « DKC RF3500; 

* controller only. 

inf ormation.dXi_f lags - DKI_FMTVOL; 

*/ 
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♦(struct dk_info *)addr «= information; 

#ifdef notyet 

return (0) ; 

open_idx_base = 64 * de vice->md_ctlr; 

break; 

bzero((char *) uopen [open_idx_base] , sizeof (uopen) /NCFC) ; 


bzero ((char *) ureserved [NCF] , sizeof (byte) ) ; 

case RFIOCSDEBUG: /* set debug level */ 

bzero((char *) uwritten [NCF] , sizeof (byte) ) ; 


bzero( (char *) uonfmk [NCF] , si zeof (byte) ) ; 

saf ef ree ( (caddr_t) iomem) ; 

bzero ((char *) uonEOF [NCF] , si zeof (byte) ) ; 

iomem_count — ; 

#endif 

if (iomem_wanted) { 


iomem_w anted = 0; 

printf ("RFIOCRESET: Return to cs35ut\n") ; 

wakeup ( (caddr t)iiomem wanted); 

return (0) ; 

} 

break; 

level - ♦ (dword *)addr; 


rfsddbg - level; 

case RFIOCGENOPT : 

return (0) ; 



printf ( "RFIOCGENOPT: \n") ; 

case RFIOCGDEBUG: /* get debug level ♦/ 

safef ree ( (caddr_t) iomem) ; 


iomem_count — ; 

saf ef ree ( (caddr_t) iomem) ; 

if (iomem_wanted) { 

iomem_count — ; 

iomem_wanted * 0; 

if (iomem_wanted) { 

wakeup ( (caddr t)iiomem wanted); 

iomem_w anted =0; 

> 

wakeup ( (caddr t)&iomem wanted); 


} 

printf ("RFIOCGENOPT: allocate mem for cmd list\n") ; 

* (dword * ) addr * rfsddbg; 

/* allocate mem for ext pb for command list cmd */ 

return (0) ; 

xpb * (EXTPB *) safealloc (sizeof (EXTPB) ) ; 


if (xpb — (EXTPB *) NULL) { 

case RFIOCGDEVID : /* get device id (SEQ_ACC, DIR_ACC ...) */ 

DEBUG (0x100, printf ("cfioctl: Can't allocate memory for 


return (EIO) ; 

saf ef ree ( (caddr_t) iomem) ; 

} 

iomem_count — ; 


if (iomem_wanted) ( 


iomem_w anted » 0; 

printf ("Sett ing up PB for General Options cmd\n"); 

wakeup( (caddr t)&iomem wanted); 

/* Set the General Board Options */ 

} 

gopt = (GOPTPB ♦)&xpb->pb; 

♦(dword * ) addr - rfdinfo [MINER] . dev_id; 

bzero ((char ♦)gopt, sizeof (EXTPB) ) ; 

return (0) ; 

gopt->id = 0; 


gopt -> opt flags = rfsdoptions; 

case RFIOCGBLKSIZE : /* get blocksize */ 

gopt->thrott le - THROTTLE; 

safef ree ( (caddr_t) iomem) ; 

gopt->ownid = coninfo [device->md_ctlr] ; 

iomem_count — ; 

gopt->target id = RF3500_ID; 

if (iomem_wanted) ( 

gopt->command = C_OPTION; 

iomem_w anted = 0; 

printf ("RFIOCGENOPT: Issue General Options command\n") ; 

wakeup( (caddr t)&iomem wanted); 


) 

if (sglcmd(xpb, cfcontroller_info[device->md_ctlr] ) ) { 

♦(dword *)addr * record_inf o [unit] .bsize; 

printf ("cfioctl : Cannot set General Board Options !\n") ; 

return (0) ; 

blkpr (&xpb->sb, sizeof (STATBLK) ) ; 


safe free ( (caddr_t ) xpb) ; 

case RFIOCSBLKSIZE : /* set blocksize */ 

return (EIO) ; 

safef ree ( (caddr_t) iomem) ; 

} 

i ome m_c ou n t — ; 

printf ("RFIOCGENOPT: Return to cs35ut\n"); 

if (iomem_wanted) { 

return (0) ; 

iomem_w anted * 0; 

break; 

wakeup { (caddr t)4iomem wanted); 


} 

case RFIOCUNITOPT: 

record_info[unit] .bsize « * (dword *)addr; 
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printf ("RFIOCUNITOPT:\n"> ; 

bzero ((char *) cmdptr->pblist, si zeof (PARMBLK) * NPB); 

safefree ( (caddr t) iomem) ; 

bzero ((char *) cmdptr->sblist , sizeof (STATBLK) * NSB); 

ionem count — ; 


if (Iomem wanted) { 

/* Use an ext pb to issue type 0 commands 

iomsm wanted - 0; 

* dis intr a wait for cmds to complete. 

wakeup { (caddr t)aiomem wanted); 

*/ 

> 

xpb->intr « 0; 


xpb->resv0 » 0; 

prints ("RFIOCUNITOPT : allocate mem Sor cmd list\n") ; 

xpb->resvl “0; 

/* allocate mem Sor ext pb Sor command list cmd */ 


xpb - (EXTPB *) safealloc (sizeof (EXTPB) ) ; 

/* Issue a 'Start command list' command 

iS (xpb — (EXTPB *) NULL) ( 

* Let the cntr know where the cmd list 

DEBUG (0x100, printf ("cfioctl : Can't allocate memory Sor 

* buffer is 

return (EIO) ; 

*/ 

> 

DEBUG (0x100, printf ("cfioctl : Issuing 'Start command lis 

/* Issue a 'unit options' command to set the unit up */ 

setup - ( SETUPPB *) axpb->pb; 

bzero ( (char *)xpb, sizeof (EXTPB) ) ; 

bzero ((char *) setup, sizeof (EXTPB) ) ; 

upb - (UOPPB *)sxpb->pb; 

setup->id = 0; 

upb->dist imeout - 100000; /* */ 

setup->addrmod - VME ADD MOD; 

upb->unit id - rSdinSo (MINER) .tag id; /* SCSI target id */ 

setup->targetid - RF3500 ID; 

upb->targetid - RF3500 ID; 

setup->memaddr - realaddr (cmdptr) ; 

upb->selt imeout - 256; /* Default is 0 */ 

vp « device ->md mc->mc intr; 


setup->intr * (device->md mc->mc intpri « 8) | vp->v ve 

if (rfdinfo [MINER] .devoid !- SEQ_ACC) /* if dev isnt a tape */ 

setup->command - C_STARTCL; 

upb->retrycntrl - RCRBE | RCRCE | RCRPE | RCISB | SCINT; 

if (sglcmd(xpb, device->md me)) { 

upb->re try limit « 3; 

printf ( "cf attach: Cannot setup command list!\n") 

) else 

blkpr (axpb->sb, si zeof (STATBLK) ) ; 

{ 

safefree ( (caddr t) cmdptr) ; 

upb->retrycntrl - 0; 

safefree ( (caddr t)xpb); 

upb->re try limit « 0; 

return (EIO) ; 

upb->uSlags - 0; 

) 

/* set the request sense, byte count. This is set by the usr */ 

safefree ( (caddr t)xpb); 

/* the unit ops Sield oS the rfdinfo array for each device. */ 

return (0) ; 

if (options 6 REQLENHI) { 

break; 

if (options & REQLENLO) { 


upb->reqlength - 32; 

case RFIOCMDSEN: 

} else { 

/* Issue a mode sense receiving just the parameter list 

upb->reqlength - 24; 

* without additional pages. */ 

> 

PB. add r mod - VME ADD MOD; 

} else ( 

PB. vmeaddr = RF ADDR( iomem); 

if (options & REQLENLO) { 

PB. count - MEMSIZE; 

upb->reqlength = 16; 

PB.scdb.cmd - SC SENMODE; 

} else { 

PB. scdb.bytel = bunit << 5; 

upb->reqlength = 0; /* default (8) */ 

if (rfdinfo [MINER] .unit_ops & EXABYTE) 

> 

PB.scdb.byte4 = 14; 

if (options & NORETRYSOFT) { 

if (rfsd ex MX4 23) { 

upb->uflags |= UF ISE; 

/* five vend unique */ 

> 

PB.scdb.byte4 = 17; 

if (options & SYNCHRONOUS) { 

} 

upb->uf lags |- UF_SYN; 

) else 
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> 

upb->command - C_UNITOPT; 

{ 

PB. scdb.byte4 « 12; 

printf ("RFIOCUNITOPT : Issue a unit options command\n”) ; 

} 

if (sglcmd (xpb, cf controller_inf o [device->md_ctlr] ) ) { 

goto exec; 

printf ( "cfioctl : Cannot set Unit Options ! \n") ; 

break; 

blkpr (axpb->sb, sizeof (STATBLK) ) ; 


safefree ( (caddr_t) xpb) ; 

case RFIOC MDSEL: 

return (EIO) ; 

ms = (mode_sel *) iomem; 

> 

*ms = * (mode_sel *)addr; 

printf ("RFIOCUNITOPT: return to cs35ut\n") ; 

/* Issue a mode select command sending just the parameter list 

return (0) ; 

* without additional pages. */ 

break; 

PB. add r mod « VME_ADD_MOD; 


PB. vmeaddr * RF ADDR( iomem); 

case RFIOCCMDLST: 

PB. count - MEMSIZE; 

cmdq[device->md_ctlr] - (CMDLIST *) NULL; 

PB.scdb.cmd = SC_SELMODE; 


PB. scdb.bytel - bunit << 5; 

/* Release iomem, iomem not used for cmdlst */ 

if (rfdinfo [MINER] .unit ops a EXABYTE) 

safefree ( (caddr_t) iomem) ; 

{ 

iomem_count — ; 

PB . sedb . by te4 = 14; 

if (iomem_wanted) { 


iomem_wanted - 0; 

if (rfsd_ex_MX4_23) { 

wakeup ( (caddr t)aiomem wanted); 

/* five vend unique */ 

> 

PB. scdb.byte4 = 17; 

/* allocate mem for ext pb for command list cmd */ 

} 

} else 

xpb - (EXTPB *) safealloc (sizeof (EXTPB) ) ; 

{ 

if (xpb — (EXTPB *) NULL) ( 

PB. scdb.byte4 = 12; 

DEBUG (0x100, printf ("cfioctl : Can't allocate memory for 

) 

return (EIO); 


> 

/*ms->vend_uniq[0] = rf sd_ex_optionall; 


ms->vend_uniq[l] = rfsd_ex_cart; */ 

cmdptr «■ cmdq [device ->md_ctlr] ; 

mdsel_val [unit] = *ms; 

/* Allocate a command queue for each controller. */ 

goto exec; 

if (cmdptr “ (CMDLIST *) NULL) { 

break; 

cmdq[device->md_ctlr] - (CMDLIST *) safealloc (sizeof (CMDL 


DEBUG (0x2, printf ("cfioctl: allocated cmdlist at %x" , cm 

case RFIOC MDSEN3 : 

DEBUG (0x2, printf(" for controller %d\n”, device->md_ctl 

pg3 * (page_3 *)addr; 

cmdptr -> cmdq[device->md ctlr] ; 

/* Issue a mode sense for the pages of geometry. */ 

if (cmdptr -- (CMDLIST *) NULL) ( 

PB . addrmod « VME_ADD_MOD; 

printf ("cfioctl : Cannot allocate memory for comm 

PB. vmeaddr = RF ADDR( iomem); 

safefree ( ( caddr_t) xpb) ; 

PB. count « MEMSIZE; 

return (EIO) ; 

PB.scdb.cmd = SC_SENMODE; 

> 

PB. scdb.bytel = bunit << 5; 


PB.scdb.byte2 = pg3->page_code; 

/* Initialize the command list buffer: 

PB . scdb.byte4 = 34; 

* set IN and OUT pointers to zero 


* set the list size fields 

goto exec; 

*/ 

break; 

cradptr->pbin - 0; 


cmdptr->pbout « 0; 

case RFIOC MDSEN4 : 

cmdptr->sbin * 0; 


cmdptr->sbout - 0; 

pg4 * (page_4 *)addr; 

cmdptr->pbsize = NPB; 

/* Issue a mode sense for the pages of geometry. */ 

cmdptr->sbsize * NSB; 

PB. addrmod » VME_ADD_MOD; 

cmdptr->resv [0] * cmdptr->resv [1] * 0; 

PB. vmeaddr • RF_ADDR (iomem) ; 
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PB. count - MEMSIZE; 

PB. scdb.cmd - SCJSENMODE; 

PB. scdb.bytel - bunit « 5; 

PB. scdb.byte2 - pg4->page_code; 

PB. scdb,byte4 - 30; 

goto exec; 
break; 

case RFIOCINQ: 

/* Issue a SCSI Inquiry command */ 

PB . addrmod - VME_ADD_MOD; 

PB. vmeaddr - RF_ADDR (iomem) ; 

PB. count - sizeof (inq_data) ; 

PB. scdb.cmd - SC_INQUIRY; 

PB. scdb.bytel “ bunit « 5; 

PB. scdb.byte4 - sizeof (inq_data) ; 

inqdat *■ (inq_data *) iomem; 

bzero ( (char *) inqdat, sizeof (inq_data) ) ; 

goto exec; 
break; 

case RFIOCLOAD: 

PB. scdb.cmd - SC LOAD; 

PB. scdb.byte4 - LOAD; 
goto exec; 

/* unload */ 

UNLOAD : 

case RF IOC UNLOAD : 

PB.scdb.cmd - SC_L0AD; 

PB. scdb.bytel |« 1; /* immed */ 

PB. scdb.bytel * 0; 
goto exec; 

/* "rat status" - not much returned, but no hard error */ 
case MTIOCGET : /* get tape status */ 

mtgetp - (struct mtget *) addr; 

/* 

* Ought to do something with these sometime — ghg 
*/ 

mtgetp->mt_erreg - 0; 
mtgetp->mt_resid * 0; 
mtgetp->mt_dsreg - 0; 
mtgetp->mt_fileno “ 0; 
mtgetp->mt_blkno - 0; 

mtgetp->mt_type - 0x28; /* what sun uses for Exabyte */ 
goto out; 

case MT IOC TOP : 

uflagoff (uwritten, unit, MINER); 

/* 

* If we are about to do a "mt bsr" or "mt fsr" and 

* have a "pending" EOF (read but not delivered) 
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PB.scdb.cmd - SC LOAD; 

PB. scdb.bytel - RETEN | LOAD ; 
break; 

case MTWEOF : 

PB.scdb.cmd » SC_WFM; 

PB.scdb.byte2 - (mtop->mt_count » 16) a OxFF; 

PB . scdb.byte3 - (mtop->mt_count » 8) & OxFF; 

PB. scdb.byte4 * (mtop->mt_count) & OxFF; 

/* allow use of "short" filemarks */ 
if ( (options & EXABYTE) && rf sd_ex_write_short_fm) 
PB.scdb.byteS - 0x80; 

break; 
cas« MTFSF : 

if (mtop->mt_count — 0) 
goto out; 

if (uflagtst (uonEOF, unit, MINER) 

(options & EXABYTE)) { 

uflagoff (uonEOF, unit, MINER); 
if ( — mtop->mt_count »» 0) { 

safefree ( ( caddr_t) iomem) ; 
i ome m_c oun t — ; 
if (iomem_w anted) { 

iomem_wanted =* 0; 

wakeup ( (caddr t)tiomem wanted); 

) 

return (0) ; 

) 

} 

PB.scdb.cmd - SC SPACE; 

PB. scdb.bytel |« SFM; 

PB. scdb.byte2 » (mtop->mt_count>>16) & OxFF; 

PB. scdb.byte3 « (mtop->rat_count>>8) a OxFF; 

PB. scdb.bytel » (mtop->mt_count) a OxFF; 
break; 
case MTFSR: 

if (mtop->mt_count «* 0) 
goto out; 

PB.scdb.cmd - SC SPACE; 

PB. scdb.bytel | - BLOCK; 

PB.scdb.byte2 * (mtop->rat_count>>16) a OxFF; 

PB. scdb.byte3 - (mtop->mt_count>>8) a OxFF; 

PB. scdb.bytel - (ratop->mt_count) a OxFF; 
break; 
case MTBSR: 

if (mtop->mt_count -- 0) 
goto out; 

PB.scdb.cmd « SC SPACE; 

PB. scdb.bytel |- BLOCK; 

/* was wrong. . bksp uses forward with negative count */ 
/* this was added */ 
mtop->mt_count » -mtop->mt_count ; 

PB. scdb.byte2 * (mtop->mt_count>>16) a OxFF; 
PB.scdb.byte3 » (mtop->mt_count>>8) a OxFF; 

PB. scdb.byte4 = (mtop->mt_count) a OxFF; 
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* we have to bksp over the EOF and clear the 

/* was wrong. . bksp uses forward with negative count */ 

* pending flag. — ghg. 

/* this was added */ 

*/ 

mtop->mt_count = -mtop->mt_count ; 

if (uflagtst (uonEOF, unit, MINER)) { 


switch (mtop->mt_op) { 

break; 

case MTFSR: 

case MTBSF: 

case MTBSR: 

if (mtop->mt_count « 0) 

PB.scdb.cmd « SC SPACE; 

goto out; 

PB. scdb.bytel |= SFM; 

if (uflagtst (uonEOF, unit, MINER) aa 

PB. scdb.byte2 - OxFF; 

(Options a EXABYTE)) ( 

PB. scdb.byte3 - OxFF; 

uflagoff (uonEOF, unit, MINER); 

PB. scdb.byte4 * OxFF; 

if (++mtop->mt_count 0) { 

PB. targetid * rfdinfo [MINER] .tag id; 

out : 

PB. scdb.bytel |= rfdinfo [MINER] . log_unit « 5; 

safefree ( (caddr_t) iomem) ; 

/* Wait for the buffer header to get free */ 

iomem_count — ; 

ps - splx (pritospl (cf controller info [ctlr] — >me_i 

if (iomem_w anted) { 

bp » arf sdbuf [unit] ; 

iomem_wanted - 0; 

while (bp->b flags & B BUSY) { 

wakeup (( caddr t) aiomem wanted); 

bp->b_f lags |- B_WANTED ; 

) 

sleep((caddr t)bp, PRIBI0) ; 

return (0) ; 

bp->b flags a« ~B WANTED; 

j 

} 

bp->b_flags |= B_BUSY; 

) 

PB.scdb.cmd «= SC_SPACE; 

splx (ps) ; 

PB. scdb.bytel |» SFM; 

bp->b_dev » dev; 

/* was wrong. . bksp uses forward with negative count */ 

bp->b_un.b addr — (caddr_t) dev; 

mtop->mt_count - -mtop->mt_count ; 


PB.scdb.byte2 - (mtop->mt_count»16) a OxFF; 

errco “0; 

PB.scdb.byte3 - (mtop->mt_count>>8) a OxFF; 

if ( rf sdcmd (aPB, device ->md_mc, unit)) { 

PB.scdb.byteS = (mtop->mt_count) a OxFF; 

printf ("cfioctl: pending bksp failed\n") 

/* was wrong., bksp uses forward with negative count */ 

errco - EIO; 

) 

mtop~>mt_count = -mtop->mt_count ; 

/* Wakeup any process sleeping on this buffer */ 

break; 

bp->b flags a= ~B BUSY; 


if (bp->b_f lags & BJWANTED) { 

case MTOFFL: 

wakeup ( (caddr t)bp) ; 

uflagoff (uonEOF, unit, MINER); 

bp->b flags a- ~B WANTED; 

if (options a EXABYTE) 

) 

rfsd errlog(dev); 

if (errco) { 

goto UNLOAD;” - 

safefree ( (caddr_t) iomem) ; 

break; 

iomem_count — ; 


if (iomem_wanted) { 

case MTREW: 

iomem_w anted » 0; 

/* these commands clear EOF read, but not reported */ 

wakeup ( (caddr t) aiomem wanted) ; 

uflagoff (uonEOF, unit, MINER); 

> 

PB.scdb.cmd - SC_REWIND; 

return (errco) ; 

uflagon (ugeneral, unit, MINER); 

) 

if (options a EXABYTE) 

uflagoff (uonEOF, unit, MINER); 

rfsd_errlog (dev) ; 

bzero ((char *)aPB, si zeof (PARMBLK) ) ; 

break; "~ 

PB . id = (dword) arf sdbuf [unit] ; 

case MTNOP : 

PB. targetid - rfdinfo [MINER] .tag id; 

safefree ( (caddr_t) iomem) ; 

> 

iomem_count' — ; ~ 

) 

if (iomem_wanted) { 

switch (mtop->mt op) { 

iomera_w anted » 0; 

case MTRETEN : 

wakeup ( (caddr_t) aiomem_wanted) ; 
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> 

iomem count — ; 

return (0) ; 

if (iomem wanted) { 

break; 

iomem wanted ■ 0; 

case MTERASE: 

wakeup ( (caddr t) fciomem wanted); 

/* these commands clear EOF read, but not reported */ 

} 

uflagoff (uonEOF, unit, MINER); 

return (EINVAL) ; 

PB.scdb.cmd * SC ERASE; /* erase */ 

>*/ 

PB. scdb .bytel |» 1; /* erase to EOT */ 

#endif 

break; 

PB.scdb.cmd - SC DEFLIST; 


PB. scdb. byte 2 - 0x18; 

} 

/♦PB . scdb .byte2 * def lst->list [0] ; */ 

/* these commands clear EOF read, but not reported */ 

/*PB.scdb.byte7 - BYTE1 (MEMSIZE) ; 

uflagoff (uonEOF, unit, MINER); 

PB. scdb.byte8 « BYTEO (MEMSIZE) ; */ 

break; 

PB . scdb.byte7 - 0x04; 

) 

PB. scdb.byte8 - 0x00; 


PB. count - MEMSIZE; 

PB . targetid - rfdinfo [MINER] .tag id; 

PB. addrmod - VME ADD MOD; 

PB. scdb. bytel |« rfdinfo [MINER] . log unit « 5; 

PB.vmeaddr “ RF ADDR (iomem); 


break; 

/* Execute rest of the commands */ 


switch (utype [unit] ) { 

case RFIOCFMT : /* format */ 

case DIR ACC: 

fmt “ (format *)addr; 

case WORM: 

if (utype [unit] !- DIR ACC) { 

case RDONLYDIR ACC: 

safefree ( (caddr t) iomem) ; 

switch (cmd) ( 

iomem count — ; 

case DKIOCGPART: /* Get partition info */ 

if (iomem wanted) { 

if (PB. targetid -- OxFE) { /* Floppy */ 

iomem wanted « 0; 

PB.scdb.cmd - SC RDCAP; 

wakeup ( (caddr t) (iomem wanted); 

PB. count “ sizeof (read cap); 

) 

PB. addrmod - VME ADD MOD; 

return (EINVAL) ; 

PB.vmeaddr » RF ADDR(iomem); 

) 

) else { 

/* Wait for the buffer header to get free */ 

safef ree ( (caddr t) ioraera) ; 

ps “ splx (pritospl (cf controller info [ctlr] ->mc intpri) ) ; 

iomem count — ; 

bp » trfsdbuf [unit] ; 

if(iomem wanted) { 

buf free (dev, bp); 

iomem wanted “ 0; 

splx (ps) ; 

wakeup( (caddr t)i.iomem wanted); 

bp->b dev * dev; 

) 

bp->b un.b addr “ (caddr t)dev; 

/* just copy what we have */ 

/* If def 1st type is true, user wants to include 

♦(struct dk map *) addr=partitions [unit ] [partno] ; 

* defect list information during format 

return (0) ; 

*/ 

> 

if(fmt->def 1st type) 

break; 

{ 


PB.scdb.cmd - SC DEFLIST; 

case DKIOCSPART: /* Set partition info */ 

PB. scdb .byte7 - BYTE1 (MEMSIZE) ; 

safef ree ( (caddr t) iomem) ; 

PB . scdb .byte8 - BYTEO (MEMSIZE) ; 

iomem count — ; 

PB. count “ MEMSIZE; 

if (iomem wanted) { 

PB. addrmod - VME ADD MOD; 

iomem wanted «= 0; 

PB.vmeaddr = RF ADDR(iomem); 

wakeup( (caddr t) (iomem wanted) ; 

errco “ 0; 

) 

for (i - 0; i < 3; i++> 

/* change our copy */ 

{ 

if (PB. targetid — OxFE) 

PB. scdb.byte2 ■ (fmt->def 1st type | def 

partitions [unit] [0] - * (struct dk map *)addr; 

if ( ! (rfsdcmd (&PB, device->md me, unit) ) ) 

else 

{ 

partitions [unit] [partno] » *(struct dk_map *)add 

/* this means it worked! */ 
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return (0) ; 

def_lst - (def_list *) ioraera; 


def_list_byte ■ def_lst->list_by 

case RFIOCVFY : /* verify */ 

def_lst->list_byte ■ 0; 

vreq « (struct dk_vfy *) addr; 

good_def list - 1; 

PB. count -14; 

break; 

PB.scdb.cmd - SC VERIFY; 

} 

PB. scdb. byte 2 - BYTE 3 (vreq->dkv_blkno) ; 

) 

PB. scdb .byte 3 - BYTE2 (vreq->dkv blkno); 

if ( igood deflist) 

PB. scdb. byte 4 - BYTE1 (vreq->dkv_blkno) ; 

( 


DEBUG (0x204, printf ( "cfioct 1 : operation 

PB . scdb .byte 5 » BYTE0 (vreq->dkv blkno); 

errco » EIO; 

PB. scdb .byte 7 * BYTE1 (vreq->dkv_nblk) ; 

/* Wakeup any process sleeping on 

PB. scdb .byte 8 * BYTEO (vreq->dkv_nblk) ; 

* this buffer */ 

break; 

wakeprocess (bp) ; 

case RFIOCMAP: /* Map request */ 

safefree ( (caddr_t) iomem) ; 

mreq “ (struct dk_mapr *) addr; 

iomem_count — ; 

deflp - (struct defect_list *) iomem; 

if (iomem_w anted) { 

/* Wait for the buffer header to get free */ 

iomem_wanted = 0; 

ps - splx (pritospl (cfcontroller_info[ctlrJ ->mc_intpri) ) ; 

wakeup ( ( caddr t) (iomem wanted) ; 

bp “ trfsdbuf [unit ] ; 

} 

buf_free (dev, bp); 

return (errco) ; 

splx(ps) ; 


bp->b_dev “ dev; 

} 

bp->b_un.b_addr - (caddr_t) dev; 

> 

errco “ 0; 

bzero ( (char *)&PB, sizeof (PARMBLK) ) ; 


PB. targetid « rfdinfo [MINER] . tag id; 

PB. count « 14; 

PB.scdb.cmd - SC_FORMAT; 

PB. addrmod - VME ADD MOD; 

PB. scdb. bytel * (bunit « 5 | def_list_byte) ; 

PB.vmeaddr “ RF ADDR (deflp) ; 

PB . scdb.byte3 * BYTE1 (fmt->lnterleave) ; 

PB.scdb.cmd - SC REASSIGN; 

PB. scdb.byte4 » BYTEO (fmt->interleave) ; 

def lp->dll - 4; 

if(fmt->def 1st type) 

deflp->resv0 • deflp->resvl — 0; 

PB. flags - VALID | DAT | DIR; 

while (lerrco && mreq->dkm_nblk) { 

PB. count “ MEMSIZE; 

deflp->lba - mreq->dkm_fblk; 

PB. addrmod = VME_ADD_MOD; 

if (rfsdcmd(&PB, device ->md_mc, unit)) { 

PB.vmeaddr •* RF_ADDR ( iomem) ; 

DEBUG (0x204, printf ( "cfioctl : operation 


errco - EIO; 

errco = 0; 

> 

if (rfsdcmd (&PB, device->md me, unit) ) 

mreq->dkm_f blk++ ; 

{ 

mreq->dkm nblk — ; 

DEBUG (0x204 , print f ( "cfioctl : operation failed\n 

} 

errco * EIO; 

/* Wakeup any process sleeping on this buffer */ 

) 

wakeprocess (bp) ; 


safef ree ( (caddr_t) iomem) ; 

/* Wakeup any process sleeping on 

i omem_c ount — ; 

* this buffer */ 

if (iomem_wanted) { 

wakeprocess (bp) ; 

iomem_w anted =0; 

safefree ( (caddr_t) iomem) ; 

wakeup ( (caddr t) (iomem wanted); 

iomem_count — ; 

) 

if (iomem_wanted) { 

return (errco) ; 

iomem_w anted =0; 

case RFIOCRDDEF : /* read defect list */ 

wakeup( (caddr t)&iomem wanted); 

#ifdef not yet 

} 

/*deflst “ (def list *)addr;*/ 

return (errco) ; 

/*if (utype [unit] «* DIR_ACC) { 

break; 

safef ree ( (caddr_t) iomem) ; 
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case RFIOCRDCAP: /* Read capacity */ 

*(inq_data *)addr =» *inqdat; 

PB.scdb.cmd - SC RDCAP ; 

break; 

PB . scdb .byte 2 - 0; 

case RFIOCRDDEF : 

PB . scdb .byte 3 - 0; 

*(def list *)addr - * (def list *) iomem; 

PB. scdb. byte 4 - 0; 

break; 

PB. scdb .byte 5 - 0; 


PB . scdb .byte8 - 0; 

> 

PB. count - sizeof (read cap); 


PB. addr mod - VME_ADD_MOD ; 

/* Wakeup any process sleeping on this buffer */ 

PB . vmeaddr - RF_ADDR (iomem) ; 

wakeprocess (bp) ; 

break; 

safefree ( (caddr t)iomem); 


iomem count — ; 

default : 

if (iomem wanted) { 

safefree ( (caddr t) iomem) ; 

iomem wanted - 0; 

iomem count — ; 

wakeup ( (caddr t)&iomem wanted); 

if (iomem wanted) ( 

> 

iomem wanted ■ 0; 

return (erreo) ; 

wake up ( (caddr_t) &±oir»m_wamted) ; 

} 

return (EINVAL) ; 


break; 


case SEQ ACC: 


switch (end) { 


case DKIOCGPART: /* Get partition info */ 


safefree ( (caddr t) iomem) ; 


iomem count--; 


if (iomem wanted) { 


iomem wanted - 0; 


wake up ( (caddr_t) *ion»m_wanted) ; 


/* just copy what we have */ 


* (struct dk map *) addr « partitions [unit] [partno] ; 


return (0) ; 


case RFIOCFMT: /* format */ 


PB.scdb.cmd - SC FORMAT; 


break; 


case MTIOCTOP : 


/* our work is already done above — pass through here 


break; 


NOP: default: 


safefree ( (caddr t) iomem) ; 


iomem count — ; 


if (iomem wanted) { 


iomem wanted - 0; 


wakeup ( (caddr_t) fciomem_wanted> ; 


return (EINVAL) ; 


break; 

} 


exec : 


/* Wait for the buffer header to get free */ 


Nov 22 09:31 1989 cs35.c Page 79 

Nov 22 09:31 1989 cs35.c Page 81 

ps = splx (pritospl (cfcontroller_info[ctlr] ->mc intpri)); 


bp = srfsdbuf [unit] ; 

/******************************************************************************* 

buf_free (dev, bp); 

* * 

splx(ps) ; 

* Subroutine: cfsize * 

bp->b_dev « dev; 

* * 

bp->b_un.b_addr - (caddr_t) dev; 

* Calling Sequence: cfsize (dev) * 

erreo =0; 

* Called by: UNIX I/O system * 

if (rf sdcmd (&PB, device ->md_mc, unit)) { 

* * 

DEBUG (0x204, printf ( "cf ioctl : operation failed\n");) 

* Calling Parameters: dev - major and minor device number * 

erreo - EIO; 

* * 

if (PB.scdb.cmd — SC_VERIFY) { 

* Local Variables: device - pointer to device information * 

vreq->dkv badblk - bp->b resid; 

* * 

vreq->dkv_error - MISCOMPARE; 

* Calls Subroutines: None * 

erreo = 0; 

* * 

> 

} 

* Public/Global Variables:None * 


* Description: * 

/**** commands that return data ****/ 

* This routine returns the size of the requested partition in * 

if (! erreo) ( 

* blocks. * 

switch (cmd) ( 

* * 

case RFIOCRDCAP: 

***************** ************************************************** ************/ 

*(read_cap *)addr * *(read_cap *) iomem; 


break; 

daddr_t 

case DKIOCGPART: /* Only should do this for floppies. */ 

cfsize (dev) 

rc - (read_cap *) iomem; 

dev t dev; 

record_info[device->md unitj.nblk - 

{ 

(rc->nblk[0] « 24) | 

int MINER; 

(rc->nblk[l] « 16) | 

int unit; 

(rc->nblk[2] « 8) | 

int partno; 

(rc->nblk[3] ) ; 

REGISTER struct mb_device ‘device; 

record_info[device->md_unit] . nblk++; 


xpart .dkl_cylno «• 0; 

DEBUG (0x1 , printf ("cfsize : \n") ; ) 

xpart .dkl_nblk - record_inf o [device->md unit].nblk; 


* (struct dk_map *) addr = xpart; 

MINER = minor (dev); 

break; 

unit « rfdinfo [MINER] .dev_index; 

case RFIOCMDSEN : 

partno * rfdinfo[MINER].partition; 

ms - (mode_sel *) iomem; 


* (mode sel *)addr - *ms; 

if (rfdinfo [MINER] .dev_index >*= NCF) ( 

break; 

DEBUG (0x1, printf ("device not configured!\n") ; ) 

case RFIOCMDSEL: 

return (-1) ; 

* (mode sel *)addr * *ms; 

> 

break; 


case RFIOCMDSEN3 : 

device «= cfdrive_inf o[unit] ; 

ms - (mode_sel *) iomem; 


offset - (ms->blk_des_len - 8); 

if (device «= NULL | | device->md_alive == 0) { 

*pg3 - * (page_3 *) & (ms->vend_uniq[ offset] ) ; 

DEBUG (Oxl, printf ("device not alive\n");) 

* (page 3 *)addr - *pg3; 

return (-1) ; 

break; 

} 

case RFI0CMDSEN4 : 

if ( rfdinfo [MINER] ,tag_id «» OxFE) { 

ms - (mode_sel *) iomem; 

return (partitions [device->md_unit] [0] .dkl_nblk) ; 

offset “ (ms->blk_des_len - 8); 


*pg4 - * (page_4 *) t (ms->vend_uniq[ offset] ) ; 

) else { 

* (page 4 *) addr - *pg4; 
break; 

return (partitions [device->md_unit ] [partno] ,dkl_nblk) ; 

case RFIOCINQ: 

} 
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********** 


Subroutine : 

Calling Sequence: 
Called by: 

Calling Parameters: 
Local Variables: 


sglcmd 
sglcmd ( ) 
cfattach 

xpb - extended RF 3500 parameter block 

pb - address of the extended parameter block 
rfreg - pointer to RF 3500 hardware ports 
timer - loop counter 

msw, lsw - MSW and LSW of a long word 
Calls Subroutines: None 

Public/Global Variables: xpb - extended RF 3500 parameter block 
Description: 

A type 0 command is sent to the RF 3500. The address of the 
extended parameter block is written to the address buffer port 
and a 0 is written to the channel attention port. The status 
block is then polled until the command completes. 


*************************** 


******************************* 


static 

sglcmd (xpb, ctlr) 

REGISTER EXTPB *xpb; 

REGISTER struct mb_ctlr *ctlr; 

{ 

REGISTER RF35REG *rfreg - (RF35REG *) ctlr->mc_addr; 
register int waitfor; 

REGISTER dword pb; 

REGISTER word lsw, msw; 

REGISTER long timer; 

/* Clear the status block */ 

bzero( (char *)&xpb->sb, sizeof ( STATBLK) ) ; 


/* Wait until we can write to address buffer port */ 
timer = 0L; 

waitfor = SWAB (bsybit [ctlr->mc_ctlr] ) ; 
while ( (rf reg->status & waitfor) 1* waitfor) 

#ifdef TOOLONG 

if (++timer > TOOLONG) { 

printf ("sglcmd: timeout ... BSY\n" ) ; 

printf ("sglcmd: status port = %x\n", rf reg->status) ; 
blkpr(xpb, sizeof (EXTPB)); 
return (1) ; 

} 

#else TOOLONG 
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#endi f TOOLONG 
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/*************************************************************************** 

* Subroutine: cfprint * 

* Calling Sequence: cfprint (str, dev) 

* 

* Called By: 

* 

* Calling Parameters: 

* str: string to be printed 

* dev: device number 

* Local Variables: 


Calls Subroutines : None . 

Public/Global Variables: 


Description : 

Print out an error message. Called from Kernel. 


****************** 


********************* 


cfprint (dev, str) 
char *str; 

{ 

printf ( "RF3500 : %s, drive %d\n", str, dev&0177) ; 

> 


***/ 


/* Tell the controller our system characteristics */ 

/* Write the control and address modifier to the address buffer port */ 
rf reg->addrbuf - SWAB (CNTRL « 8 | VME_ADD_MOD) ; 

/* convert address of xpb to a dword for shifting */ 

pb - RF_ADDR(xpb) ; 

msw = SWAB (pb » 16 & Oxf ff f ) ; 

lsw * SWAB (pb & Oxffff); 

DEBUG (0x800, printf ( "sglcmd : pb=%x msw»%x lsw=%x\n", pb, msw, lsw);) 


/* write the msw and lsw of the pb to the address buffer port */ 
rf reg->addrbuf = msw; 
rf reg->addrbuf = lsw; 


/* Get the controllers attention */ 
rfreg->attention = 0; 

bsybit [ctlr->mc_ctlr] A = 1; /* Toggle the bit */ 


/* Wait for the command to complete */ 

DEBUG (0x801, 

printf ("sglcmd: Waiting for ST_CC\n"); 

printf ("sglcmd: status port = %x\n", SWAB (rfreg->status) ) ; 
blkpr(xpb, sizeof (EXTPB) ) ; 

) 


timer = 0; 

while ( (xpb->sb. flags & ST_CC) !- ST_CC) ( 
if (++timer > MAX WAIT) { 

printf ("RF3500: sglcmd: timeout ... no ST_CC\n") ; 
printf ("RF3500 : sglcmd: status port = %x\n", SWAB(rfreg- 
blkpr (&xpb->sb, sizeof (STATBLK) ) ; 
return (1) ; 

> 

> 


if ( (xpb- >sb. flags & ST_ERR) ==* ST_ERR) { 
if (rf sddbg) ( 

printf ("RF3500: sglcmd error 0x%x, on cmd 0x%x\n", 
xpb->sb .error, xpb ->pb. scdb.cmd) ; 
if (xpb->sb. error < EE_FRMERR> 

printf (" (%s)\n", cfcntrlerr [xpb->sb .error] ) ; 

blkpr (&xpb->sb, sizeof (STATBLK) ) ; 

> 


if (rf sddbg) 

blkpr (&xpb->sb, sizeof (STATBLK) ) ; 
if (xpb->sb. error == EE_SCSISELTO) 
return (ENXIO) ; 

if { (xpb~>sb.scsistat & STATMASK) == CHECK_COND) { 

if ( (xpb->sb.scsiflags & SENSEMASK) « UNIT_ATTEN) 
return (0) ; 

if (xpb->sb. inf ob3 *=* 0x42) 
return (ENXIO) ; 

) 

return (1) ; 
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} 

return (0) ; 


/* check: to see if we are asking for a blk past the end */ 
if(blkno > partitions [unit] [part] .dkl_nblk || 

(blkno + nblk) > partitions [unit] [part] .dkl_nblk) ( 
return (EINVAL) ; 

} 

/* initialize extended parameter block - disable interrupts */ 
bzero(&xpb, sizeof (EXTPB) ) ; 


/* Calculate some of the inputs... */ 
gp « tgeometry [unit] ; 
btarget - rfdinfo [MINER] . tag_id; 
bunit - rfdinfo [MINER] .log_unit; 
blklen - record_info [unit] .bsize; 

blkno +*» (partitions [unit] [part] .dkl_cylno * gp->dkg_nsect * gp->dkg_nhe 
nsectors - nblk * DEV_BSIZE; /* Really bytes */ 
if (blklen) 

nsectors /« blklen; 


/* Setup the write command */ 
pb = (PARMBLK *)*xpb.pb; 
bzero( (char *)pb, sizeof (PARMBLK) ) ; 
pb->id - 0; 

pb->targetid - btarget; 
pb- >addrmod « VME_ADD_MOD; 
pb->vmeaddr = RF_ADDR(addr-DVMA) ; 
pb->count «• nblk * DEV_BSIZE; 
pb->scdb. cmd - SC_WRITE; 
if (utype [unit ] — SEQ_ACC) { 

pb->scdb.bytel - (bunit « 5) | (BYTE2 (blkno) k OxlF) ; 

if (blklen) 

pb->scdb . by tel |- 1; /* Fixed */ 

pb->scdb.byte2 «= BYTE2 (nsectors) ; 
pb->scdb.byte3 = BYTE1 (nsectors) ; 
pb->scdb.byte4 = BYTEO (nsectors) ; 

) else { 


} 


pb->scdb.bytel 
pb->scdb.byte2 
pb->scdb .byte3 
pb->scdb.byte4 


(bunit « 5) | (BYTE2 (blkno) k OxlF); 

BYTE1 (blkno) ; 

BYTEO (blkno) ; 
nsectors; 
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/* issue the write command and check for errors */ 
if (sglcmd(&xpb, device->md_mc) ) { 

printf ( "cfdump: write failed from block %d for %d blocks\n", 
blkno, nblk) ; 
return (EIO) ; 

} 

return (0) ; 
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************************ 
Subroutine : 

Calling Sequence: 

Called by: 

Calling Parameters: 


Local Variables: 


Calls Subroutines: 


Public/Global Variables :DVMA 


rfdurrp(dev, addr, blkno, nblk) 

The UNIX panic/dump routines 

dev - major and minor device of swap 
addr - starting address of click to dump 
blkno - starting block at which to dump it 
nblk - number of disk blocks to durrp 

xpb - extended paramter block for write 
pb - point to paramters in above 
unit - unit number (drive number) 
device - system device description 

None 


Subroutine : 

Calling Sequence: 

Called by: 

Calling Parameters: 

Local Variables: 

Calls Subroutines: None 

Public/Global Variables :None 
Description: 

A type 1 command is sent to the RF 3500. 


rfsdcmd 

rfsdcmd(pb, ctlr, unit) 

cfopen, cfclose, cfioctl 

pb - RF 3500 parameter block 

bp - pointer to our local buffer header 
rfreg - pointer to RF 3500 hardware ports 


*******************/ 


* Description: * 

* Called for each core click of the system which paniced. * 

* Writes out the mapped page to the device at the block * 

* specified. * 

* * 
******************************************************************************* / 

cf dump (dev, addr, blkno, nblk) 
dev_t dev; 
caddr_t addr; 
daddr_t blkno, nblk; 

{ 

REGISTER EXTPB xpb; /* extended parameter block */ 

REGISTER PARMBLK *pb; 
register int MINER; 
register int unit; 
register int part; 

REGISTER struct mb_device *device; 
register int nsectors, blklen; 

REGISTER byte btarget, bunit; 

REGISTER struct dk_geom *gp; 

MINER = minor (dev); 
unit - rfdinfo [MINER] .dev_index; 
part = rfdinfo [MINER] .partition; 
device - cfdrive_info [unit] ; 

/* does the unit make sense and is the drive alive */ 
if (unit > NCF | | device =*= NULL | | !device->md_alive> { 
return (ENXIO) ; 

} 


rfsdcmd (pb, ctlr, unit) 

PARMBLK *pb; 

REGISTER struct mb_ctlr *ctlr; 
register int unit; 

{ 

REGISTER RF35REG * rfreg = (RF35REG *) ctlr->mc_addr; 
register int ps; 

REGISTER byte error; 

#ifdef STANDALONE 

static EXTPB *xpb = NULL; /* extended paramter block for 

executing commands */ 

if (xpb — NULL) 

xpb - (EXTPB *)safealloc(sizeof (EXTPB) ) ; 
bzero (xpb, sizeof (EXTPB) ) ; 
bcopy (pb, xpb, sizeof (PARMBLK) ) ; 
return (sglcmd( xpb, ctlr)); 

#else 

DEBUG (0x900, printf ( "rfsdcmd: \n") ; ) 
ps = splx (pritospl (ctlr->mc_intpri) ) ; 
pb->id * (dword) arfsdbuf [unit] ; 

/* Stuff the parameter block in the command list 
* and issue an attention to the controller 
*/ 

#if NPBMASK 

while ( ( (cmdq[ctlr->mc_ctlf ] ->pbin + 1) 6 NPBMASK) == cmdq[ctlr->mc_ctlr 

♦else 

while ( (cmdq[ctlr->mc_ctlr] ->pbin + 1) % NPB — cmdq [ctlr->mc_ctlr] ->pbo 
#endif NPBMASK 




Nov 22 09:31 1989 cs35.c Page 90 


Nov 22 09:31 1989 cs35.c Page 92 


{ 

pb_wanted[ctlr->mc_ctlr] - 1; 

DEBUG (0x5, printf ("rfsdcmd: command list fill\n");) 
sleep ( (caddr_t) *pb_wanted[ctlr->mc_ctlr] , PRIBIO) ; 

> 

cmdq [ctlr->mc_ctlr] ->pblist [cmdq[ctlr->mc_ctlr] ->pbin] - *pb; 

#if NPBMASK 

cmdq [ctlr->mc_ctlr] ->pbin - (cmdq[ctlr->mc_ctlr] ->pbin + 1) t NPBMASK; 

false 

cmdq [ctlr->mc_ctlr] ->pbin - (cmdq[ctlr->mc_ctlr] ->pbin + 1) % NPB; 
fendlf NPBMASK 

DEBUG (0x900, 

blkpr (pb, slzeof (PARMBLK) ) ; 

printf ("rfsdcmd: issuing attention\n" ) ; 

) 

/* stuff the SCSI cdb command into b_resid for intr proc */ 
rfsdbuf [unit] .b_resid - pb->scdb. cmd; 

rf sdbuf [unit] .b_error — 0; /* nobody seems to clear the error! */ 

rfsdbuf [unit] .b_f lags -B_ERR0R; 

rfreg->at tent ion - SHAB(l); 

/* Wait for the command to get finished */ 
sleep (srfsdbuf [unit] .b_un.b_addr, PRIBIO); 

error - rfsdbuf [unit] .b_error; 

/* check B_ERROR as well — ghg */ 

if (error -- 0 tt (rfsdbuf [unit] .b_f lags & B_ERR0R) ) 
error - EIO; /* something better ? */ 
splx(ps) ; 
return (error) ; 
fendif STANDALONE 
) 


from unaligned iopbmap allocations. To just protect ourselves,* 
we could ask for (size + 3) bytes, but that might cause * 
problems for other drivers, so we will ask for (size +4) * 
bytes, thereby leaving iopbmap aligned or unaligned as we * 
found it. * 




struct sapool { 

caddr_t start; 
long len; 

>; 

static caddr_t 
safealloc (size) 
int size; 

{ 

REGISTER char *chunk; 

REGISTER struct sapool *alchunk; 
register int chsize; 

chsize = size + sizeof (struct sapool) + sizeof (int); 
if ((chunk - (caddr_t) rmalloc (iopbmap, chsize) ) NULL) 

{ 

return (chunk) ; 

> 

alchunk - (struct sapool *) ( (int) (chunk+sizeof (int)) & -(sizeof (int)-l)); 

alchunk->start »* chunk; 

alchunk->len » chsize; 

return ((char *) (alchunk + 1)); 

> /* safealloc */ 

static void 
safefree (chunk) 
caddr_t chunk; 

( 

REGISTER struct sapool *alchunk; 

alchunk « ((struct sapool *) chunk) - 1; 
rmfree (iopbmap, alchunk->len, alchunk->start) ; 

> 

/**************************«**************************************************** 
* * 

* Subroutine: rfsd_errlog * 

* * 

* Calling Sequence: rf sd_errlog (dev) * 
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Called by: 

Calling Parameters: 
Calls Subroutines: 


cfread, cfwrite, cfioctl, cfclose 
dev 

rfsdcmd 


Public/Global Variables : None 


Nov 22 09:31 1989 cs35.c Page 93 


:*************************************! 


Subroutine : 
Calling Sequence: 
Called by: 


blkpr 

blkpr (ca, n) 
this driver 



Description: 

Optional Exabyte error log statistics. Exabyte (since 
-October '87) maintains a 3 byte error count for error logging 
purposes. It can be read by doing a request sense command, and 
looking at sense bytes 16, 17, 18. For writes, this is the number 
of blocks (1 Kbyte on tape) which were rewritten (rewrites) . For 
reads, this is the number of ECC corrections performed. 


Calling Parameters: 

Local Variables: 
Calls Subroutines: 


ca - pointer to structure 
n - number of bytes in the structure 

None 

None 


The drive clears the errlog counters whenever: 

1) A tape is loaded 

2) A reading to writing transistion takes place 

3) A writing to reading transistion takes place 

4) A sense request is made with vendor byte 5, bit 7 set in the cdb 
(cdb->vu_v57) 


* Public/Global Variables :None 

* Description: 

* Displays command or status block. 

* 

***************************************************** 
blkpr (ca, n) 
unsigned char *ca; 
byte n; 

{ 

REGISTER byte i; 


For now, we just issue a simple 1 line printf, whenever something * 
happens which would cause the drive to clear its error counters (1-3 * 
above). A REW or OFFLINE command also forces the stats. Hitting the * 
drive eject button causes the stats to be lost. Also have to keep * 
track of bytes written/read, so we can come up with an error * 
percentage (Exabyte folks like to just deal with the percentages) . * 
Transferrs, not a multiple of 1Kbyte, are rounded up to the next whole * 
Kbyte for the errlog stats., since this is what gets occupied on the * 
tape. * 
To enable/disable errlog stats, use adb to patch kernel variable * 
"rf sd_pr_errlog" (an int) to one of the below values (hex) : * 


} 

/* 


for (i=0; i<n; i++) ( 

printf (" %x",ca [i] ) ; 
if ( 1 ( (i+1) %16) ) 

printf ( "\n") ; 

) 

if (i % 16) printf ("\n") ; 


/* append trailing CRLF . */ 


:**********************■ 


************************** 


0x0 - do not print anything * 
0x1 - uprintf - goes to "/dev/tty" (current window or login session) * 
0x2 - printf - goes to ” /dev/console " . * 
0x8 - rnisc errlog debug info * 

* 

bits can be OR'd together (default is 0x3) . * 
We are seeing good tapes and drives have a write error percentage * 
around 0.5% to 2.0% or less, and less than 1% retries for reading. * 


Subroutine : 


safealloc, safefree 


*******************************************************************************/ 


Calling Sequence: 


safealloc (size) 
safefree (ptr) 


Called by: 


Calling Parameters: 


rfprobe, rfslave, rfattach, rfstrategy and 
rfintr just for scatter/gather header, and 
various rfioctl support routines 

size - the size of DVMA needed 

ptr - pointer to a DVMA chunk to release 


Calls Subroutines: 


safealloc: rmalloc 
safefree: rmfree 


Public/Global Variables :None 
Description: 

Called to allocate and return iopbmap resources to insulate us 


# define EXABYTE_SENSE_LEN 26 

rfsd_errlog (dev) 
register dev_t dev; 

( 

register int MINER; 
register int unit; 

REGISTER struct nto_device ‘device; 
REGISTER struct buf ‘bp; 

REGISTER PARMBLK PB; 
unsigned char *ucp; 

REGISTER char ‘iomem; 
int 1, left; 
int errco =0; 
byte bunit; 
byte btarget; 
char *s; 
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int tot_retries; 
register int percent; 

/* 

* We first run a sense command. . . . 

* need to dig up buffers, iomem, etc, first. . 
V 

MINER - minor (dev) ; 
unit - rfdinfo [MINER] .dev_index; 
device » cfdrive_info [unit] ; 
btarget - rfdinfo [MINER] .tag_id; 
bunit - rfdinfo [MINER] .log_unit; 


lastop [unit] - UNDEF ; 
ret urn ( 0 ) ; 

> 

#endi f NCF 


/* allocate space for iomem */ 

/* probably no need to word align this, since we will do */ 

/* only byte ref to it */ 

while ((iomem - (char *) rmalloc (iopbmap, MEMSIZE)) -- (char *)NULL) { 
if (iomem_count) ( 

iomem_w anted « 1; 

sleep ( (caddr_t) iomem_w anted, PRIBIO) ; 

> else { 

DEBUG (100, printf ( "rfsd_errlog: Can't allocate memory fo 
return (ENOMEM) ; 

> 

} 

iomem_count++; 

DEBUG (2, printf ("rfsd_errlog: allocated iomem at %x\n", iomem);) 


/* Get the buffer for commands... */ 

1 - splx (pritospl (device->md_mc->mc_intpri) ) ; 

bp = arfsdbuf [unit] ; 

while (bp->b_flags 4 B_BUSY) { 

bp->b_f lags |- BJWANTED; 
sleep (bp, PRIBIO); 
bp->b_f lags 4- -B_WANTED; 

} 

bp->b_f lags |- B_BUSY; 
splx (1) ; 

bp->b_dev — dev; 
bp->ta_un . b_addr ** iomem; 


bzero ( (char *)*PB, sizeof (PARMBLK) ) ; 

PB . targetid - btarget; 

PB . addrmod - VME_ADD_MOD; 

PB.vmeaddr “ RF_ADDR ( iomem) ; 

PB. count - EXABYTE_SENSE_LEN; 

PB.scdb.cmd - SC_SENSE; 

PB. scdb.bytel - bunit << 5; 

PB . SCdb.byte4 - EXABYTE_SENSE_LEN; 

PB. scdb. byte5 - 0x80; /* clear counters */ 

bzero ((char *) iomem, EXABYTE_SENSE_LEN) ; 

DEBUG ( 0x201 , printf ( "rf sd_errlog: Issuing 'sense' command to unit %d\n", 
if (rf sdcmd (&PB, device->md_mc, unit)) { 

DEBUG (0x201, printf ( "rf sd_errlog : sense command failed\n", bp->b 
errco - ENXIO; 

} 
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if (errco) ( 

bp->b_f lags 4- ~B_BUSY; 
if (bp->b_f lags 4 B_WANTED) ( 
wakeup ( (caddr_t)bp) ; 

) 

rmfree (iopbmap, MEMSIZE, (caddr_t) iomem) ; 
iomem_count — ; 
if (iomem_wanted) ( 

iomem_w anted =0; 

wakeup ( (caddr_t) iiomem_wanted) ; 

} 

return (errco) ; 

} 

s — ” ” ; 

if (lastop[unit] 1- UNDEF 44 kb_xfer [unit] ) { 
ucp - (unsigned char *) iomem; 
if (lastop [unit] -- READ) 
s - "read”; 

if (lastop [unit] — WRITE) 
s - "write"; 

tot_retries - (ucp[16]«16) | 

(ucp [17] «8) | ucp [18] ; 


/******************************************************************************* 

******************************************************************************** 





Copyright (C) Ciprico Incorporated 1987. 


Ciprico Incorporated 
2955 Xenium Lane 
Plymouth, MN 55441 
(612) 559-2034 


Module Name: 
Package: 
Module Rev: 
Date : 

Subroutines: 


cs35err.h 

Rimfire 3500 Driver for UNIX Sun OS on VME bus 
$Revision$ **’ 
$Date$ **** 





Description: **** 

This is an include file for Rimfire 3500 driver. It defines **** 
the errors returned by RF-3500 controller. And there is an **** 
array of one line messages for the errors. **** 


*************************************************************************** 

**************************************************************************/ 


percent - (tot_retries * 1000) / kbxfer [unit] ; 
left - (ucp[23]«16) | 

(ucp[24]«8) | ucp [25] ; 

if (left 4 0x00800000) 

left |- OxFFOOOOOO ; /* sxt */ 

left 0x500; /* tape used for the BOT */ 
left »« 10; /* Kbytes -> Mbytes */ 

if (rfsd_pr_errlog 4 01) 

printf ("st%d: %d %s retries out of %d Kbytes (%d.%d%%), %d Mbytes until LEOT\n", 
unit, tot_retries, s, kb_xfer [unit] , percent/10, percent%10, left) ; 
if (rfsd_pr_errlog 4 02) 

( 

#ifndef STANDALONE 

uprintf ("st%d: %d %s retries out of %d Kbytes (%d.%d%%), %d Mbytes until LEOT\n" 
unit, tot_retries, s, kb_xfer [unit] , percent/10, percent%10, left) ; 

iendif 


lastop [unit] - UNDEF; 
bp->b_f lags 4- ~B_BUSY; 
if (bp ->b_f 1 ags 4 B_WANTED) { 
wakeup ( (caddr_t)bp) ; 

} 

rmfree (iopbmap, MEMSIZE, (caddr__t) iomem) ; 
iomem_count — ; 
if (iomem_wanted) { 

iomem_wanted =0; 

wakeup ( (caddr_t) 4iomem_wanted) ; 

> 

kb_xf e r [ uni t ] = 0; 
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************************************************************************ 


Revision History 


****************** 




Revision Date Author 

Description of Change 


1.1 10/17/86 

Pre-Release . 

1.1 08/20/87 

Initial A Release. 


Umesh Gupta 
D. A. Dickey 


$Log: I:\software\drivers\rf3500\sun\2_0\vcs\cs35err.h_v $ 

Rev 2.0 07 Apr 1989 13:38:58 JMartin 

Initial revision. 

2.0 04/05/89 J. Martin 

Made changes for multiple controllers. See cs35.c for details. 

$Log$ 

2.1 09/06/89 Jody Martin 

1. Made changes to driver to support the Rimfire 3523. See cs35.c 
revision history for details. 

***************** 
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# define STATMASK 

♦define FM 
♦define ILI 
♦define EOM 


0x80 

0x20 

0x40 


/* Status mask */ 

/* file mark */ 

/* illegal length indicator */ 
/* end of media */ 


/* One line message for SCSI errors */ 


char 
/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 

/* 


0 */ 
1 */ 
2 */ 

3 */ 

4 */ 

5 */ 

6 */ 

7 */ 

8 */ 
9 */ 
A */ 
B */ 
C */ 
D */ 
E */ 
F */ 


{ 

"No sense”, 
"Recovered error", 
"Not ready", 
"Medium error", 
"Hardware error", 
"Illegal request", 
"Unit attention", 
"Data protect", 
"Blank check", 
"Vender unique", 
"Copy aborted", 
"Aborted command" , 
"Equal", 

"Volume overflow", 
"Miscompare" , 
"Reserved" 


}; 

♦define NOSENSE 
♦define RECOVERED 
♦define UNIT_ATTEN 
♦define PROTECTED 
♦define BLANK 
♦define MISCOMPARE 
♦define SENSEMASK 

♦define AV 


0x00 

0x01 

0x06 

0x07 

0x08 

OxOE 

OxOF 

0x80 


/* No sense? */ 

/* Recovered error */ 
/* Unit attention */ 


Data Protected ■ 
Blank check */ 

Data Verify failed 
Sense mask */ 


/* Valid information */ 
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/**************** 


************* 


♦ifndef lint 

static char Sccsh2id[J 

♦endif 


"@ (♦) cs35err.h (75222006) Copyright Ciprico Inc. 1987 


Copyright 1987 Ciprico Incorporated. 






***★ 


Ciprico Incorporated 



**** 





**** 


2955 Xenium Lane 



**** 

/* 

One line 

messages for the controller errors */ 

**** 


Plymouth, MN 55441 



**** 





**** 


(612) 559-2034 



**** 

char * 

'cfcntrlerrtl “ ( 

**** 





**** 

/* 

0 

*/ 

"No error". 

**** 

Module Name: 

cs35f lp . h 



**** 

/* 

1 

*/ 

"Invalid command". 

**** 

Package : 

Rimfire 3500 Driver for UNIX Sun 

OS 

on VME bus 

**** 

/* 

2 

V 

"Bad unit number specified". 

**** 

Module Rev: 

$Revision$ 


**** 


/* 

3 -A 

V 


**** 

Date: 

$Date$ **** 




/* 

B 

*/ 

"Reserved field not zero". 

**** 





**** 

/* 

C-D 

*/ 


**** 

Subroutines : 




**** 

/* 

E 

*/ 

"Command list stopped”. 






**** 

/* 

F 

*/ 

"Bad command list size field". 

**** 

Description: 




**★★ 

/* 

10 

*/ 

"Bad command list number to start/stop". 


This is 

an include file for Rimfire 3500 

driver. It defines 

**** 

/* 

11 

*/ 

"List state wrong for start/stop command", 

**** 

the floppy configuration for release 1.5 

of 

the driver or 


/* 

12-13 

*/ 


**** 

later. 




**** 

/* 

14 

*/ 

"Software bus timeout error". 

**** 





**** 

/* 

15 

*/ 

"Bus error reported by control chip". 

******* 

**************** 

********************************* 1 

***1 

**************** 

**** * 

/* 

16-ID 

*/ 


******* 

**************** 

********************************* 1 

fc**4 

******************** / 

/* 

IE 

V 

"SCSI select timeout". 







/* 

IF 

*/ 

"SCSI disconnect timeout". 







/* 

20 

*/ 

"SCSI parity error". 







/* 

21 

*/ 

"Unexpected disconnect", 







/* 

22 

*/ 

"Undefined or uninterpretable SCSI error". 







/* 

23 

*/ 

"SCSI device-specific error". 







/* 

24-2F 

*/ 








/* 

30-3F 

*/ 








/* 

40 

*/ 

"Bad gap size found during format", 







/* 

41 

*/ 

"Command corrplete timeout". 







/* 

42 

*/ 

"Floppy disk unit not ready". 







/* 

43 

*/ 

"Seek fault on floppy drive". 







/* 

44 

*/ 

"CRC error in iD", 







/* 

45 

*/ 

"Write fault on drive", 







/* 

46 

*/ 

"Data CRC error". 







/* 

47 

*/ 

"Sector not found". 







/* 

48 

*/ 

"Floppy dusk data lost from 2793", 







/* 

49 

*/ 

"Data underrun during operation". 







/* 

4A-4F 

*/ 








/* 

50-5F 

*/ 








/* 

60- 6F 

*/ 








/* 

70-7F 

*/ 









); 

♦define 

♦define 

♦define 


SCS ISELTO OxlE 

_SCSIERR 0x23 

_FRMERR 0x80 


/* SCSI status (only relevent bits 
♦define CHECK_COND 0x02 

♦define DEVICE_BUSY 0x08 

♦define RESV CONF 0x18 


/* SCSI select timeout */ 

/* SCSI returned bad status */ 

/* 80H and above are firmware errors */ 


defined) */ 

/* Check condition */ 

/* Busy */ 

/* Reservation conflict */ 
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******************** 


************** 


Revision History 


**************** 


Revision Date Author 

Description of Change 


$Log: I:\software\drivers\rf3500\sun\2_0\vcs\cs35flp.h_v $ 

Rev 2.0 07 Apr 1989 13:39:52 JMartin 

Initial revision. 

2.0 04/05/89 Jody Martin 

New file at release of 2.0 for floppy configuration. See cs35.c for 
details of other changes. 


$Log$ 

2.1 


09/06/89 Jody Martin 

1. Made changes to driver to support the Rimfire 3523. See cs35.c 
revision history for details. 
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#ifndef lint 

static char Sccsh5id[] 


/* floppy media types */ 


"0 (#) cs35f lp.h (75222006) Copyright 1989, Cipricoln 


♦define 
#def ine 
♦define 
♦define 
♦define 
♦define 
♦define 
♦define 
♦define 


FLM_200SSSD 

FLM_200DSSD 

FLM_200SSDD 

FLM_200DSDD 

FLM_130SSSD48 

FLM_130DSDD48 

FLM_130DSDD96 

FLM_13 0DSQD 96 

FLM_90DSDD135 


♦define FL_MEDIA (x) 

/* floppy sector sizes 

♦define FLSS_128 
♦define FLSS_256 
♦define FLSS_512 
♦define FLSS_1024 
♦define FLSS_2048 

♦define FL_SECTS (x) 

♦define FL_SECTC(x) 

/* floppy sectors per track */ 


(0x05) 

/* 

8" (200mm) SS/SD, 48tpi */ 

(0x6) 

/* 

8" (200mm) DS/SD, 48tpi */ 

(0x9) 

/* 

8" (200mm) SS/DD, 48tpi */ 

(Oxa) 

/* 

8" (200mm) DS/DD, 48tpi */ 

( Oxd) 

/* 

5.25" (130mm) SS/SD 48tpi */ 

(0x12) 

/* 

5.25" (130mm) DS/DD 48tpi */ 

(0x16) 

/* 

5.25" (130mm) DS/DD 96tpi */ 

(Oxla) 

/* 

5.25" (130mm) DS/QD 96tpi */ 

(Oxle) 

/* 

3.5" (90mm) DS/DD 135tpi */ 

( (x) &0x3f ) 


/* get media type from field ■ 

(0) 

/* 

128 byte sectors */ 

(0x40) 

/* 

256 byte sectors */ 

(0x80) 

/* 

512 byte sectors */ 

(OxcO) 

/* 

1024 byte sectors */ 

(0x100) 

/* 

2048 byte sectors */ 


(128 « ( ((x) » 6) &~0x3f8) ) /* floppy sector size */ 

((x) & Oxlc) /* floppy sector size code */ 


♦define 

FLSPT 

5 

( 5«10) 

/* 

5 

sectors/track */ 

♦define 

FLSPT 

8 

(8«10) 

/* 

8 

sectors/track */ 

♦define 

FLSPT” 

'9 

(9«10) 

/* 

9 

sectors/track */ 

♦define 

FLSPT" 

”io 

(10«10) 

/* 

10 

sectors/track */ 

♦define 

FLSPT 

15 

(15«10) 

/* 

15 

sectors/track */ 

♦define 

FLSPT” 

”16 

( 16«10 ) 

/* 

16 

sectors/track * / 

♦define 

FLSPT” 

18 

(18«10) 

/* 

18 

sectors/track */ 

♦define 

FLSPT” 

'31 

(31«10) 

/* 

31 

sectors/track */ 

♦define 

FL_SPT (x) 

(((x) & -OxcOOO) >> 10) /* floppy 


/* floppy single/double step option (reading 48tpi floppies on 96tip drive)*/ 
/* should not format with this set, and really shouldn't write either, 
though it is often nice to be able to do so */ 

♦define FL_DSTP (1«15) 


♦define FL_RDSTP(x) 


((x) » 15) 
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/************ 

************* 

**** 

**** 

**** 

**** 

**** 

**** 


**** 

**** 

**** 


******************************************************* 

Copyright (C) Ciprico Incorporated 1987. 

Ciprico Incorporated 
2955 Xenium Lane 
Plymouth, MN 55441 
(612) 559-2034 

Module Name: cs35if.h 

Package: Rimfire 3500 Driver for UNIX Sun OS on VME bus 

Module Rev: $Revision$ **** 

Date: $Date$ **** 

Subroutines: 

Description: 

This is an include file for the Rimfire 3500 Driver. It 
defines the software interface to the board, defining the 
various bit level patterns used by the RF-3500. Also 
defined are the various structures used by the driver 
and the controller board. 
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Revision History 


Revision Date Author 

Description of Change 


1.0 07/14/86 
Initial Release. 

1.1 02/02/87 
Initial B Release. 

1.1 08/20/87 

Initial A Release. 

1.4 07/13/88 J. K. Martin 

1. Added SunOS3 and SunOS4 defines for the two sun 

systems . 

$Log: I : \sof tware\dr ivers\ rf 3500\sun\2_0\vcs\cs35if . h_v 


D. A. Dickey 
D. A. Dickey 


Rev 2.0 07 Apr 1989 14:05:16 

Initial revision. 


JMartin 


04/05/89 J. Martin 

Added changes for multiple controllers. See cs35.c for details. 


$Log$ 

2.1 


09/06/89 Jody Martin 

Made changes to driver to support the Rimfire 3523. 
revision history for details. 


See cs35.c 
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The definitions within this file are as follows: 

- Type definitions for 8, 16, and 32 bit quantities. 

- Macros for busting the minor device number. 

- Definition for special control registers on RF-3500. 

- Definition for standard parameter block and its variations. 

- Definition for memory based structures used by the controller. 

- Driver internal structures . 


♦define UNIT<dev) 


♦define LUNIT (dev) ((dev) & 0x7) 

♦define PARTITION (dev) ((dev) & 0x7) 


♦define SWAB(x) ( (x) & OxFFFF) 


/* Logical unit */ 

/* Partition on disk */ 


/* no swap for motorola processor *f 
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♦ifndef lint 

static char Sccshlid[] - "8 (♦) cs35if . h (75222006) Copyright 1987, 1989 Ciprico 
♦endif 

/* NOTE 

* You must define exactly one of the following system symbols. 


/* Hardware Ports 


/* ♦define SunOS3 
/*#define SunOS4 


/* define for SunOS 3.2, 3.4, and 3.5 systems 
/* define for SunOS 4.0 systems 


♦if (defined (SunOS3) && (defined (SunOS4) 
char c * OSLEVEL; 

♦endif 

♦if defined (SunOS3) && defined (SunOS4) 
char c = OSERROR; 

♦endif 


/* First a few defines to make life 

♦define byte unsigned char 

♦define word unsigned short 

♦define dword unsigned int 


little easier */ 

/* 8 bit quantity */ 
/* 16 bit quantity */ 
/* 32 bit quantity */ 


/* These two defines should be the same */ 

♦define LOGDSK 8 /* Partitions on physical disk */ 

♦define FLPFMT 8 /* Number of different floppy formats */ 

♦define MEMSIZE 1024 /* DMA memory size */ 


♦define BYTEO(n) 
♦define BYTEl(n) 
♦define BYTE2 (n) 
♦define BYTE3 (n) 


( (byte) (n) & OxFF) 
BYTE0( (dword) (n)»8) 
BYTE0( (dword) (n)»16) 
BYTE0( (dword) (n)»24) 


/* UNIX minor device number 
* 

* The minor device number is broken down as follows: 


Specifies UNIT unit (0-31) , this in turn is mapped 
into a specific target id which is interpreted from 
the md_slave value in each mb_device struct. 
Specifies UNIX logical disk partition (0-7), or 
Specifies format for floppy, or 
Specifies no rewind on tape 


The Rimfire 3500 is seen as a 512 byte area in the 16 bit 
address space. There are four registers in this space, 
each on an 8 byte boundary. The registers are defined below. 


/* Hardware ports */ 
typedef struct ( 

word resv; 
word addrb 


word 

word 

word 

word 

word 

word 

} RF35REG; 


addrbuf ; 
space 1 [3] ; 
attention; 
space 2 {3] ; 
status ; 
space 3 [3] ; 
reset; 


/* msw address */ 

/* Address Buffer Port (see below) */ 


/* Channel Attention Port */ 


/* Board Status Port */ 


/* Controller Reset Port */ 


Address Buffer Port 

Requires three writes in the order provided belo 


PB address: 16 LSW 


/* Control Field bit masks * 
♦define CTRLBSW 0x01 
♦define CTRLWSW 0x02 
♦define CTRLWID 0x04 
♦define CTRLSET 0x80 

/* Status Port bit masks */ 
♦define STATRST OxFE 
♦define STATBSY 0x01 
♦define STATRDY 0x02 
♦define RESETD0NE 0x02 
♦define STATCTYPE OxFFOO 
♦define STATRF3500 0x0200 

/* Standard Parameter Block 


byte swap control, 0=no swap, 1-swap */ 
word swap control, 0-no swap, 1-swap */ 
width of data transfer, 0=16, 1=32 bit */ 
apply these controls this command */ 


status of a board reset */ 
status of the Address Buffer Port 
board is ready */ 
reset has completed */ 

Mask to grab controller type. */ 

A Rimfire 3500 board ID */ 


Command identifier 


Flags | Addr Mod | Target ID | 


VME Memory Address 


/* Macros to manipulate the minor device number */ 


Transfer Count 
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* 

+ 

+ 



+ 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

+ 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

+ 

) EXTPB; 



* 

1 

1 1 


1 2 | 3 | 




* 

+ 

+ 


+ + 

/* Command list 

format 


* 

1 

| 5 SCSI 

Command Block 6 | 7 | 

* 



















* 

1 

1 9 


1 10 | 11 | 

* 1 

Parameter block IN pointer 1 

















*/ 





* 1 

Parameter block OUT pointer 1 

t ypede f 

struct 




* + 


+ 


dword 

id; 

/* 

unique command identifier */ 

* 1 

Status 

block IN pointer 1 


byte 

resv; 



* + 




byte 

flags; 



* 1 

Status 

block OUT pointer I 


byte 

add r mod; 

/* 

address modifier used to access VME memory */ 

* + 


+ 


byte 

targetid; 

/* 

SCSI target ID */ 

* 1 

Parameter block area size I j 


dword 

vme addr; 

/* 

VME address to read from or write to */ 

* + 




dword 

count; 

/* 

Transfer count */ 

* 1 

Status 

block area size 1 


struct 

scdb { 

/* 

SCSI command descriptor block */ 

* + 





byte emd; 


/* SCSI command */ 

* 1 


1 



byte bytel; 


/* 3 high bits are logical unit ♦ */ 

* 1 


1 



byte byte2; 



* 1 

Parameter block area I j 



byte byte 3; 


/* LSB sectors */ 

* 1 


1 



byte byte 4; 


/* Number of sectors */ 

* 1 


1 



byte byte 5; 


/* Control field */ 

* + 


+ 



byte byte6; 



* 1 


1 



byte byte 7; 



* 1 


1 



byte byte8; 



* 1 

Status block area 1 i 



byte byte9; 



* 1 


1 



byte bytelO; 



* 1 


1 



byte bytell; 



* + 


+ 


}scdb; 




*/ 



> PARMBLK; 




♦define NPB 

0x20 

/* Max. number of parameter blocks */ 

/* Bits 

in flags field */ 



♦define NSB 

0x20 

/* Max. number of status blocks */ 

♦def ine 

SGO 

0x01 

/* 

Scatter/gather operation */ 




♦define 

DAT 

0x02 

/* 

Data transmitted in this operation */ 

/* Masks for wrapping around IN/OUT pointers - do NOT define these if 

♦define 

DIR 

0x04 

/* 

Direction of data transfer 1-to the target */ 

* the corresponding NxB value 

is not a power of 2 . 

♦define 

IRS 

0x0 8 

/* 

Inhibit request sense */ 

*/ 



♦define 

VALID 

0x80 

/* 

Valid */ 

♦define NPBMASK 

OxlF 

/* mask for valid parameter block index */ 






♦define NSBMASK 

OxlF 

/* mask for valid status block index */ 

/* Status Block 




typedef struct 



* 





dword 

pbin; 

/* parameter block in pointer */ 

* 

+ 


— 

— + + + 

dword 

pbout ; 

/* parameter block out pointer */ 

* 

1 

Command 

Identifier I 

dword 

sbin; 

/* status block in pointer */ 

* 

+ 

+ 

— 

— + + + 

dword 

sbout ; 

/* status block out pointer */ 

* 

1 

| SCSI status | Error | Flags | 

dword 

pbsize ; 

/* parameter block area size */ 

* 

+ 

+ 

— 

--+ + + 

dword 

sbsize ; 

/* status block area size */ 

* 

1 

Extra Information | 

dword 

resv [2] ; 

/* reserved */ 

* 

+ 


— 

+ 

PARMBLK 

pblist [NPB] ; 

/* parameter blocks */ 

* 

1 

Extra Information | 

STATBLK 

sblist [NSB] ; 

/* status blocks */ 

* 

+ 


— 


> CMDLIST; 



typedef 

struct 




/* RF 3500 commands for Targets ID OxFF */ 


dword 

id; 

/* 

command identifier generating status */ 

♦define C STARTCL 1 

/* start command list */ 


byte 

zero; 



♦define C STOPCL 2 

/* stop command list */ 


byte 

scsistat; 

/* 

SCSI status, device specific */ 

♦define C IDENTIFY 5 

/* identify */ 


byte 

error; 

/* 

RF3500 specific error */ 

♦define C_STATS 

6 

/* board statistics */ 
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byte 

flags; 

/* 

indicates type of status */ 

♦define C OPTION 7 

/* general options */ 


byte 

class; 

/* 

class/code */ 

♦define C UNIT0PT 8 

/* init I/O control group */ 


byte 

segment ; 

/* 

Segment */ 

♦define C DIAGNOSTIC 9 

/* board self -test command */ 


byte 

scsiflags; 

/* 

SCSI flags */ 





byte 

inf ob3; 

/* 

Information byte 3 */ 





byte 

inf ob4 ; 

/* 

Information byte 4 */ 

/ * * * it it it * * * * * it it it 

*************** 

******************************************* 


byte 

inf ob5; 

/* 

Information byte 5 */ 

* Command 

♦1 - Start Command List 


byte 

inf ob6; 

/* 

Information byte 6 */ 


It****** ******** 

*******************************************/ 


byte 

exlength; 

/* 

Extra length */ 




} STATBLK; 




/* Alternate Parameter Block - 

Setup command list */ 






typedef struct 



/* Status Block 

Flags Field bit 

masks */ 

dword 

id; 

/* unique command identifier */ 

♦define 

ST RTY 

0x20 

/* 

Retry required */ 

word 

resvl; 

/* reserved */ 

♦define 

ST ERR 

0x4 0 

/* 

Error, check error code */ 

byte 

addrmod; 

/* address modifier used to access VME memory */ 

♦define 

ST CC 

0x80 

/* 

Command complete, last status block */ 

byte 

targetid; 

/* SCSI target ID, set to OxFF */ 

♦define 

ST CON 

0x04 

/* 

This status block is continued from */ 

dword 

memaddr; 

/* command list memory address */ 




/* 

the previous one */ 

word 

resvO; 

/* reserved */ 

♦define 

ST SOFT 

0x02 

/* 

A soft error occured (scsi sense key 01) */ 

word 

intr; 

/* interrupt vector and level */ 






byte 

command; 

/* command to execute */ 

/* Status Block 

Class bit masks 

*/ 


byte 

resv2 [ 3] ; 


♦define 

AD VALID 

0x80 

/* 

Address field information valid */ 

dword 

resv3 [2] ; 

/* reserved */ 






} SETUPPB; 



/* Extended Parameter Block 






* 





/************** 

*************** 

******************************************* 

* 

+ 


— 

+ 

* Command 

♦2 - Stop Command List 

★ 

1 



1 

************** 

*************** 

***** ************************************** f 

* 

+ — 



— + 




* 

1 



1 

/* Alternate Parameter Block - 

Stop command list */ 

* 

+ — 



— + 

typedef struct 



* 

1 



1 

dword 

id; 

/* unique command identifier */ 

* 

+ — 



— + 

byte 

resvl [3] ; 

/* reserved */ 

* 

1 

Standard Parameter Block | 

byte 

targetid; 

/* SCSI target ID, set to OxFF */ 

* 

+ — 



— + 

dword 

resv2 [2] ; 


* 

1 



1 

byte 

command; 

/* command to execute */ 

* 

+ — 



— + 

byte 

resv3 [ 3] ; 


* 

1 



1 

dword 

resv4 [ 2] ; 


* 

+ — 



— + 

} STOPPB; 



* 

+ 





/************** 

*************** 

******************************************* 

* 

1 

Reserved 


| Interrupt | 

* Command 

♦5 - Identify 



+ 



— + + 

************** 


*****»*************************************/ 

* 

1 

Reserved, MUST be 0 | 





+ 


— 

+ 

/* Alternate Status Block for 

Identify command */ 

* 

1 



1 

typedef struct 



* 

+ — 





dword 

id; 

/* identifier */ 

* 

1 

Standard 

Status Block | 

byte 

f wrev; 

/* firmware revision level */ 

* 

+ — 



— + 

byte 

engrev ; 

/* engineering revision level */ 


1 



1 

byte 

error; 

/ * error code */ 

* 

+ 


— 


byte 

flags; 

/* flags */ 

*/ 





byte 

opt flags; 

/* optional flags (see below) */ 

t ypede f 

struct 

{ 



byte 

day; 

/* day the firmware was generated */ 


PARMBLK pb; 

/* 

standard parameter block */ 

byte 

month; 

/* month the firmware was generated */ 


word 

resvO; 

/* 

reserved */ 

byte 

year; 

/* year the firmware was generated */ 


word 

intr; 

/* 

interrupt vector and level */ 

dword 

resv; 

/* reserved */ 


dword 

resvl; 

/* 

reserved, must be 0 (zero) */ 

} RETID; 




STATBLK 

sb; 

/* 

status block */ 
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/* Opt flags field in Identify Status Block */ 

#define FDO 0x01 /* set - Floppy Disk Option present */ 

******************************* 
************************************ 


************************ 
Command #6 - Board Statistics 


*************** 


Board Statistics */ 

/* unique command identifier */ 


/* Alternate Parameter Block 
typedef struct { 

dword id; 

> STATPB; 

/****************************************************** 
* Command #7 - General Options 

****************************************************** 


/* Alternate Parameter Block - General Options command */ 1 

♦define 

BLOCK 

0x0 

typedef struct 

{ 



♦define 

SFM 

0x1 

dword 

id; 

/* 

identifier */ 

♦define 

SQFM 

0x2 

byte 

opt flags; 

/* 

optional flags (see below) */ 

♦define 

PEOM 

0x3 

byte 

throttle; 

/* 

bus throttle */ 




byte 

own id; 

/* 

SCSI target ID */ 

/* Put these 

into byte4 of scdb 

byte 

target id; 

/* 

SCSI target ID, set to OxFF */ 

/* to do. These are bit masks. 

dword 

resvO [2] ; 

/* 

reserved */ 

♦define 

LOAD 

0x1 

byte 

command; 

/* 

command to execute */ 

♦define 

RETEN 

0x2 

byte 

resv3 [3] ; 

/* 

status block interrupts (see below) */ 




dword 

resv4 [2] ; 






} GOPTPB; 







/* opt flags field in parameter 

block */ 1 




♦define DIS 

0x01 

/* 

set - Allow disconnect/reselect in SCSI ope 




♦define PAR 

0x02 

/* 

set ■ Report parity errors on SCSI bus */ 




♦define BMT 

0x04 

/* 

set * Use Block Mode Transfers to/from Memo 





/* NOTE: Suns DO NOT support the BMT option. */ 

/ *********************************************** 
* Command #8 - Unit options 

*********************************** 


/* Alternate Parameter Block 
typedef struct { 


************* 


Unit Options */ 


dword 

id; 

/* 

command identifier */ 

word 

distimeout; 

/* 

SCSI disconnect timeout, .1 sec unit */ 

byte 

unitid; 

/* 

SCSI target id */ 

byte 

target id; 

/* 

SCSI target id, set to OxFF */ 

word 

seltimeout; 

/* 

SCSI select timeout, millisec units */ 

byte 

retrycntrl; 

/* 

Retry control (see below) */ 

byte 

retrylimit; 

/* 

Number of retries if retry enabled */ 

word 

resv2; 

/* 

Reserved */ 

byte 

reqlength; 

/* 

Extended sense count for req sense cmd ’ 

byte 

uflags; 

/* 

Unit flags (see below) */ 

byte 

command; 

/* 

Command to execute (0x8) */ 

byte 

resv4 [3] ; 

/* 

Reserved */ 

dword 

resv5 [2] ; 

/* 

Reserved */ 
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#define 

♦define 

♦define 

♦define 

♦define 

♦define 

♦define 

♦define 

♦define 

♦define 

♦define 

♦define 

♦define 


SC_SEEK 

SC_WFM 

SC_SPACE 

SC_INQUIRY 

SC_SELMODE 

SC_RE SERVE 

SC_RELEASE 

SC_ERASE 

SC_SENMODE 

SC_LOAD 

SC_RDCAP 

SC_VERIFY 

SC DEFLIST 


OxOB 

0x10 

0x11 

0x12 

0x15 

0x16 

0x17 

0x19 

OxlA 

OxlB 

0x25 

0x2F 

0x37 


/* Seek */ 

/* Write filemark */ 

/* space blocks, filemarks, EOT */ 

/* Inquiry */ 

/* Mode select */ 

/* Reserve */ 

/* Release */ 

/* Erase */ 

/* Mode sense */ 

/* Load/Unload & Start/Stop Device */ 
/* Read capacity */ 

/* Verify the media */ 

/* Read defect list */ 


/* Put these into bytel of scdb for the SC_SPACE command to tell it what */ 
/* to search for. */ 


the SC_L0AD command to tell it what */ 
' not put them in is to do the opposite. 
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/* Retry control bit fields 
♦define SCINT 0x01 


♦define RCISB 
♦define RCRPE 
♦define RCRCE 
♦define RCRBE 


0x02 

0x04 

0x08 

0x10 


/* Unit flags bit fields */ 


♦define UF_IDI 
♦define UF_SYN 
♦define UF_IAT 
♦define UF_ISE 


0x01 

0x02 

0x04 

0x20 


******************** 


/* Issue "error” interrupt for each retry */ 
/* Issue status block for each retry */ 

/* Retry parity error */ 

/* Retry command errors (SCSI errors) */ 

/* Retry bus errors (selection timeouts, etc) 


/* Inhibit Disconnect */ 

/* Synchronous Transfers */ 

/* Inhibit ATN Signal */ 

/* Don't retry soft errors, but report using 
/* the flag field in the stat blk (ST_SOFT) 


************************ 


/* Alternate Parameter Block - Configure disk */ 
typedef struct { 



* SCSI 

structures 




************* 

**************** 

***«, 

««***************************/ 


/* MODE SELECT 

parameter list 

*/ 



typedef struct 

{ 




byte 

byteO; 

/* 

Reserved */ 


byte 

medium type; 

/* 

Medium type */ 


byte 

byte2; 

/* 

Reserved */ 

*/ 

byte 

blk_des_len; 

/* 

Block descriptor length */ 

*/ 

byte 

density code; 

/* 

Density code */ 


byte 

nblk[3] ; 

/* 

Number of blocks (MSB) - (LSB) */ 


byte 

byte8; 

/* 

Reserved */ 


byte 

blklen [3] ; 

/* 

Block length (MSB) - (LSB) */ 


byte 

vend_uniq[50] ; 

/* 

Vendor Unique parameter bytes */ 


} mode_sel; 


dword 

id; 

/* identifier */ 

/* Page 1 for mode select commands 

on hard drives. */ 

byte 

resvl [3] ; 

/* reserved */ 

typedef struct < 

( 



byte 

targetid; 

/* SCSI target id, set to OxFF */ 

byte 

page_code; 



dword 

resv2 [2] ; 

/* reserved */ 

byte 

page_length; 



byte 

command; 

/* Command to be executed */ 

byte 

page__l__f lags ; 

/* 

(See Below) */ 

byte 

flags; 

/* Test flags */ 

byte 

retry_cnt; 

/* 

retry count */ 

word 

resv3; 

/* Reserved */ 

byte 

corr_span; 

/* 

correction span */ 

dword 

resv4 [2] ; 

/* Reserved */ 

byte 

hd_of f _cnt ; 

/* 

head offset count */ 

); 



byte 

data_str_cnt ; 

/* 

data strobe count */ 




byte 

recov_time; 

/* 

recovery time limit */ 

flags field in PB */ 


) page_l; 




TESTSRT 

0x01 

/* Static RAM test */ 





TESTPCS 

0x02 

/* PROM checksum test */ 

/* Page_l_flags 

bit field */ 




/* Alternate Status Block for Diagnostic / Self Test command */ 
typedef struct { 


♦define DCR 
♦define DTE 
♦define PER 


0x01 

0x02 

0x04 


Disable Correction */ 
Disable Transfer on Error 
/* post Error */ 


dword 

id; 

/* 

identifier */ 

♦define 

EEC 

0x08 

/* 

Enable Early Correction */ 

byte 

zero [2] ; 

/* 

Set to zero */ 

♦define 

READCON 

0x10 

/* 

Read Continuous */ 

byte 

error; 

/* 

error code */ 

♦define 

XFERBLK 

0x20 

/* 

Transfer Block */ 

byte 

flags; 

/* 

flags */ 

♦define 

ARRE 

0x40 

/* 

Automatic Read Allocation of Defective Data B 

word 

erroraddr; 

/* 

Address where error found */ 

♦define 

AWRE 

0x80 

/* 

Automatic Write Reallocation of Defective Dat 

byte 

expected; 

/* 

Pattern expected at error location */ 






byte 

found; 

/* 

Pattern found at error location */ 

/* Page 

2 for mode select 

commands 

on hard drives. */ 


/* SCSI 
♦define 
♦define 
♦define 
♦define 
♦define 
♦define 
♦define 
♦define 
♦define 


commands */ 

SC_READY 

SC_REZERO 

SC_REWIND 

SCjSENSE 

SC_FORMAT 

SCJRDBLKLIM 

SC_REASSIGN 

SC_READ 

SC WRITE 


0x00 

0x01 

0x01 

0x03 

0x04 

0x05 

0x07 

0x08 

OxOA 


Test unit ready *, 
Rezero unit */ 
Rewind */ 

Request sense */ 
Format unit */ 
Read Block Limits 
Reassign blocks - 
Read */ 


- Sequential devices only 
Map Sector (s) */ 


/* Write */ 


typedef struct { 
byte 
byte 
byte 
byte 
word 
word 
word 
word 

) page_2; 

/* Page 3 for mode select commands on hard drives, 
typedef struct { 

by t e page_c ode ; 


page_code; 
page_length; 
b_full ; 
b_empty; 
b_inactive; 
b_dis_time; 
b_con_time; 
b_re served; 


/* Buffer Full Ratio */ 

/* Buffer Empty Ratio */ 
/* Bus Inactivity Limit * 
/* Disconnect Time Limit 
/* Connect Time Limit */ 
/* Reserved */ 
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byte 

page length; 






word 

trkpzone; 

/* 

Tracks Per Zone */ 


/************* *************** ******* *************************** 


word 

altspzone; 

/* 

Alternate sectors per zone */ 


* Structures used internally by the driver 


word 

alttpzone; 

/* 

Alternate tracks per zone */ 


*************************** ***********************************/ 


word 

alttpvol; 

/* 

Alternate tracks per volume */ 




word 

spt; 

/* 

Sectors Per Track */ 


typedef struct { 


word 

nbps; 

/* 

Bytes Per Sector */ 


byte id; /* SCSI target ID */ 


word 

interleave; 

/* 

Interleave */ 


byte unit; /* Target unit number for this device */ 


word 

trk skew; 

/* 

Track skew factor */ 


} target; 


word 

cyl skew; 

/* 

Cylinder skew factor */ 




byte 

dtype [ 4 ] ; 

/* 

Drive type fields (1-3 reserved) */ 




> page 3; 





/* Device parameters */ 


/* Page 4 for mode select commands 

on hard drives. */ 


typedef struct { 


typedef struct 

{ 




dword bsize; /* Block length */ 


byte 

page code; 




dword nblk; /* Number of blocks */ 


byte 

page length; 




} rec info; 


byte 

ncyl bO; 

/* 

Number of cylinders - MSB */ 




byte 

ncyl bl; 

/* 

Number of cylinders */ 


/* Defines the way in which the driver knows which controller has wich 


byte 

ncyl b2; 

/* 

Number of cylinders - LSB */ 


devices. Also defines the device and any unit options the device may 


byte 

nhead; 

/* 

Number of heads */ 


have. This is a 32 bit word, with 29 bits actually used. (See rfsdint.h 


byte 

scvlwp bO; 

/* 

Starting cylinder of write precomp 

- MSB */ 

for initialization) . This is the structure that defines the minor device 


byte 

scylwp bl; 

/* 

Starting cylinder of write precomp 

*/ 

number set up, as follows: dev id «• device type (SEQ ACC, DIR ACC, etc). 


byte 

scylwp b2; 

/* 

Starting cylinder of write precomp 

- LSB */ 

tag id « target id of the device, log unit 


byte 

scylrwc bO; 

/* 

Starting cylinder of reduced write 

current - 



byte 

scylrwc bl; 

/* 

Starting cylinder of reduced write 

current V 

*/ 


byte 

scylrwc b2; 

/* 

Starting cylinder of reduced write 

current - 



word 

dsr; 

/* 

Drive Step Rate */ 


struct device word { 


byte 

lzc bO; 

/* 

Landing Zone Cylinder - MSB */ 


unsigned dev index : 5; /* unit number on system */ 


byte 

lzc bl; 

/* 

Landing Zone Cylinder * / 


unsigned dev id : 8; /* device Id number (device type) */ 


byte 

lzc b2; 

/* 

Landing Zone Cylinder - LSB */ 


unsigned tag id : 8; /* devices SCSI target Id number */ 


byte 

resv [3] ; 

/* 

Reserved */ 


unsigned log unit : 3; /* logical unit number */ 


} page 4; 





unsigned unit ops : 17; /* devices unit options */ 


/* Page 5 for mode select commands 

on floppies. */ 


unsigned partition : 15; /* device partion number */ 


typedef struct 

{ 




>; 


byte 

page code; 






byte 

page length; 






word 

xfer rate; 

/* 

Transfer rate */ 




byte 

nhe ads ; 

/* 

Number of heads */ 




byte 

spt ; 

/* 

Sectors Per Track */ 




word 

nbps; 

/* 

Bytes Per Sector */ 




word 

ncyls; 

/* 

Number of Cylinders */ 




word 

s wpre; 

/* 

Starting cylinder - Write Precomp 

/ 



word 

s rwc; 

/* 

Starting cylinder - Reduced Write Current */ 



word 

dsr; 

/* 

Drive Step Rate */ 




byte 

dspw; 

/* 

Drive Step Pulse Width */ 




byte 

hd st dly; 

/* 

Head Settle Delay */ 




byte 

on dly; 

/* 

Motor On Delay */ 




byte 

off dly; 

/* 

Motor Off Delay */ 




byte 

trdy; 

/* 

Drive Provides a True Ready Signal 

*/ 



byte 

hd Id dly; 

/* 

Head Load Delay */ 




byte 

ssn sO; 

/* 

Starting Sector #, Side zero */ 




byte 

ssn si; 

/* 

Starting Sector #, Side one */ 




> page 5; 







/* Page 20 for 

mode select commands on floppies. */ 




typedef struct 

{ 






byte 

page_code ; 
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byte 

page length; 




/******************************************************************************* 

byte 

post index; 

/* 

Post Index Gap */ 


★♦★★A*************************************************************************** 

byte 

inter sector; 

/* 

Inter Sector Gap */ 


**** 


byte 

tverify; 

/* 

Seek Verification */ 


**** Copyright 1987 Ciprico Incorporated. 


byte 

t steps; 

/* 

Steps Per Track */ 


**** 

**** 

byte 

resvO; 




**** Ciprico Incorporated 


byte 

resvl; 




**** 2955 Xenium Lane 

**** 

} page_2 0 ; 





**** Plymouth, MN 55441 

***★ 






**** (612) 559-2034 

**** 

/* READ CAPACITY data list */ 




**** 

**** 

typedef struct 

( 




**** Module Name: cs35int.h 

**** 

byte 

nblk [4] ; 

/* 

Logical block address */ 


**** Package: Rimfire 3500 Driver for UNIX Sun OS on VME bus 

**** 

byte 

blklen [4] ; 

/* 

Block length */ 


**** Module Rev: SRevisionS **** 


} read_cap; 





**** Date: SDate$ **** 


/* INQUIRY Data */ 




**** Subroutines: 

**** 

typedef struct 

{ 




**** 

**** 

byte 

dtype; 




**** Description: 

**** 

byte 

rmb dtq; 




**** This is an include file for Rimfire 3500 driver. It defines 

**** 

byte 

version; 




**** the initialization for release 1.5 of the driver or 

**** 

byte 

byte3; 




**** later. 

**** 

byte 

add len; 




**** 

**** 

byte 

vend unigf411; 

/* 

This could be a MAX of 507 */ 


*********** ****** ***** *********************** ******************************* 

**** 

> inq_data; 





********************************* a****************************************** 

***/ 

/* Read Block 
typedef struct 

Limits Data */ 
{ 






byte 

byteO; 






byte 

mxblklen [ 3] ; 






byte 

mnblklen [2] ; 






) blk_lim; 







/* Defect list 

for mapping bad 

blocks */ 




struct defect 

List { 






byte 

resvO; 






byte 

resvl; 






word 

dll; /* Defect 

list length */ 




dword 

>; 

lba; /* Defect 

logical block address */ 




/* Defect list 

for reading defect 

list and formatting */ 




typedef struct 

{ 






byte 

resvO; 






byte 

list byte; 






byte 

dll msb; /* 

Defect list length */ 




byte 

dll lsb; /* 

Defect logical block address */ 




byte 

list [1020] ; 

/* 

defect list */ 




} def_list; 







typedef struct 

{ 






dword 

interleave; 

/* 

Interleave used while formatting */ 



byte 

def 1st type; 

/* 

Defect list type - Grown, Manufacturers */ 



} format; 
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*************************************************** 
Revision History 

*********************************** 


*************** 


********* 


Revision Date 

Description of Change 


Author 


$Log: I:\software\drivers\rf3500\sun\2_0\vcs\cs35int.h_v $ 

Rev 2.0 21 Apr 1989 11:14:30 JMartin 

Initial revision. 

2.0 10/01/88 Jody Martin 

New file at release of 2.0 for new minor device array. See cs35.c for 
more details of changes. 


$Log$ 

2.1 


09/06/89 Jody Martin 

1. Made changes to driver to support the Rimfire 3523. See cs35.c 
revision history for details. 


************* 


************************************** 
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********* 


**** 

**** 

**** 

**** 


Copyright (C) Ciprico Incorporated 1987. **** 

**** 

Ciprico Incorporated **** 

2955 Xenium Lane **** 

Plymouth, MN 55441 **** 

(612) 559-2034 **** 

Module Name: cs35io.h **** 

Package: Rimfire 3500 Driver for UNIX Sun OS on VME bus **** 

Module Rev: $Revision$ **** 

Date: $Date$ **** 

Subroutines: **** 

Description: **** 

This is an include file for Rimfire 3500 driver. It contains**** 

defines for I/O control commands and structures related **** 

to ioctl call. **** 
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♦ifndef lint 

static char Sccsh6id[] - "8 (#) cs35int . h (75222006) Copyright 1987, 1989 Cipri 
#endif 

/* MAXMINOR is the total amount of minor device numbers or indexes into the */ 

/* device_word array. */ 

♦define MAXMINOR (sizeof ( rfdinfo) /si zeof (struct device_word) ) 

/* MAXBOARDS is the total number of 3500 controllers that could be configured 
into the Sun system. */ 

♦define MAXBOARDS 3 

/* the following is customer site specific. The customer would set this 

up to reflect the drives that he has installed in his system. See cs35flp.h 
for explain at ion of FLM_??????, FLSS_????, and FLSPT_????? */ 
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******************************************** 
Revision History 

******************************************** 


Revision Date Author 

Description of Change 


1.1 08/20/87 

Initial A Release. 


D. A. Dickey 


♦define 

♦define 

♦define 

♦define 

♦define 

♦define 

♦define 

♦define 


FLOPPYO 
FL0PPY1 
FLOPPY2 
FL0PPY3 
FLOPPY 4 
FL0PPY5 
FLOPPY 6 
FLOPPY7 


(FLM_130DSDD48 | FLSS 
(FLMJL30DSDD48 | FLSS" 
(FLM_130DSDD48 | FLSS" 
(FLM_130DSDD48 | FLSS" 
(FLM_130DSDD96 | FLSS" 
0 

(FLM130DSQD96 | FLSS 
0 


512| FLSPT_10 ) 
512 | FLSPT_8) 
512 | FLSPT_9) 
512 | FLSPT_9) 
512 | FLSPT_9) 

512|FLSPT_15) 


♦define N0T_USED 0 

♦ifdef STANDALONE 

struct device_word rfdinfo[50]; 

♦else 

struct deviceword rfdinfo [] - 
/* device dev target 

/* index id id 

/* ADD NEW ENTRIES HERE */ 

}; 

♦endif 


$Log: I:\software\drivers\rf3500\sun\2_0\vcs\cs35io.h_v $ 

Rev 2.0 07 Apr 1989 13:39:34 JMartin 

Initial revision. 

2.0 04/05/89 J. Martin 

Changes for multiple controllers. See cs35.c for details. 

$Log$ 

2.1 09/06/89 Jody Martih 

1. Made changes to driver to support the Rimfire 3523. See cs35.c 
revision history for details. 

****************************************************************1 


logical 

unit 


unit partion */ 

opts number */ 


/* This array may be as deep as needed to fit your system config. of boards 
Also controller boards may have the same SCSI Id as they are talking on 
different SCSI buses. The boards are located by address for the VME 
bus, or by slot number for MULTIBUS so there is no conflict between 
boards as long as they have differnet addresses, or slots */ 

static int con info [MAXBOARDS] - { 

6 , 

6 , 

6 , 

); 
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#ifdef lint 

static char Sccsh4id[] - "8 (#) cs35io.h (75222006) Copyright Ciprico Inc. 1987, 
#endif 


/* Command codes for ioctl() calls */ 


♦define 

RFIOCFMT 

IOW (r. 

6, format) 

/* 

Format drive */ 

♦define 

RFIOCRDDEF 

IOR (r. 

8, def_list) 

/* 

Read defect list */ 

♦define 

RFIOCGDEBUG 

IOR (r. 

9, dword) 

/* 

Get driver debug level */ 

♦define 

RF IOCS DEBUG 

IOW (r, 

10, 

dword) 

/* 

Set driver debug level */ 

♦define 

RFIOCGSTAT 

IOR(r, 

11# 

dword) 

/* 

Get RF3500 statistics */ 

♦define 

RFIOCGDEVID 

IOR (r. 

12, 

dword) 

/* 

Get dev type (SEQ_ACC etc) 

♦define 

RFIOCRESET 

IOW ( r. 

25, 

dword) 

/* 

Reset controller */ 

♦define 

RFIOCGENOPT 

I0W(r, 

26, 

dword) 

/* 

General Options command */ 

♦define 

RFIOCUNITOPT 

iow(r. 

27, 

dword) 

/* 

Unit Options command */ 

♦define 

RFIOCCMDLST 

IOW (r, 

28, 

dword) 

/* 

Start command list */ 

♦define 

RFIOCMDSEN3 

I0WR(r, 

29, 

page_3) 

/* 

Mode Sense command pg 3 */ 

♦define 

RFIOCMDSEN4 

I0WR(r, 

, 30, 

, page_4 ) 

/* 

Mode Sense command pg 4*/ 

♦define 

RFIOCMDSEN 

IOWR (r, 

, 31, 

, mode_sel) 

/* 

Mode Sense no pages */ 

♦define 

RFIOCMDSEL 

IOWR(r, 

, 32, 

, mode sel) 

/* 

Mode Selectnse no pages */ 

♦define 

RFIOCIDENT 

IOR (r, 

67, 

RETID) 

/* 

Identify */ 

♦define 

RFIOCRDCAP 

I0R(r, 

68, 

read_cap) 

/* 

Read capacity */ 

♦define 

RF IOC MAP 

I0W(r, 

69, 

struct dk_: 

mapr) 

/* Map sector */ 

♦define 

RFIOCVFY 

IOWR (r , 

, 70, 

, struct dk 

_vfy) 

/* Verify */ 

♦define 

RFIOCG TARGET 

IOR(r, 

71, 

target) 

/* 

Who are we talking to? */ 

♦define 

RFIOCLOAD 

I0W(r, 

74, 

dword) 

/* 

Load/Start the drive */ 

♦define 

RFIOCUNLOAD 

IOW (r. 

75, 

dword) 

/* 

Unload/Stop the drive */ 

♦define 

RF IOC ANY 

I0WR(r, 

, 76, 

, dword) 

/* 

ANY SCSI command. . . */ 

♦define 

RFIOCINQ 

IOWR (r, 

- 77, 

, inq_data) 

/* 

Inquiry command */ 

♦define 

RFIOCGBLKSIZE 

IOR (r, 

126, 

, dword) 

/* 

Get driver block size */ 

♦define 

RFIOCSBLKSIZE 

I0W(r, 

127, 

, dword) 

/* 

Set driver block size */ 


♦define DKC RF3500 


11 


/* disk re-map request */ 
struct dk_mapr ( 

daddr_t dkm_fblk; 
daddr_t dkm_ttalk; 
daddr_t dkm_nblk; 
u_char dkm_re cover; 
u_char dkm_error; 

) ; 

/* disk verify request */ 
struct dk_vfy { 

daddr_t dkv_blkno; 
daddr_t dkv_nblk; 
u_char dkv_error; 
daddr_t dkv_badblk; 

} ; 

♦define SECTSIZE (512) 


/* Another controller type for dkio.h */ 


/* from block */ 
/* to block */ 

/* ♦ of blocks */ 
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/******************* 


************************************************* 
Revision History * 




*********** 


Revision Date Author 

Description of Change 


$Log: 


I:\software\drivers\rf3500\sun\2_0\vcs\cs351ib.c_v 
JMartin 


Rev 2.0 07 Apr 1989 13:39:30 

Initial revision. 

2.0 04/05/89 J. Martin 

Initial Release of this file, see cs35.c rev history for details. 


$Log$ 

2.1 


09/06/89 Jody Martin 

Made changes to driver to support the Rimfire 3523 as follows: 

- Made changes to support standalone utility. 

- Made many changes to the cs35ut utility, and the driver ioctl 
calls . 

- Made changes to support the new install script. 

- The format disk command now supports including the defect list 
during the disk format . 

- Changed the command codes to match as close as possible to the 
Rimfire 32XX rfutil. 

- Added support for selecting a dummy device to change debug 
value through the utility if you can't open another disk. 

- Added various features to existing commands . 

t** ********************************** ********************** 
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************** 

Copyright 1988 Ciprico Incorporated. 

Ciprico Incorporated 
2955 Xenium Lane 
Plymouth, MN 55441 
(612) 559-2034 


♦ifndef lint 

static char Sccsidf] 

♦endif 

♦include "cf.h" 


s351ib. c: (75222006) Copyright 1988,1989 Ciprico Inc 


Module Name : 
Package : 
Module Rev: 
Date : 

Subroutines : 
Description : 


cs351ib.c 

Rimfire 3500 Driver for UNIX Sun OS on VME bus. 
$Revision$ *** 
$Date$ **** 


********** 


♦if NCF > 0 

/* Include whatever system include files are needed here. */ 

♦include <sys/param. h> 

♦include <sys/dir.h> 

♦include <sys/user.h> 

♦include <sys/buf.h> 

♦include <sys/systm. h> 

♦include <sys/kernel . h> 

♦include <sys/map.h> 

♦include <sys/ioctl . h> 

♦include <sys/file.h> 

♦include <sys/dk.h> 

♦include <sys/mtio.h> 

♦include <sys/uio.h> 

♦include " . . /sun/dkio. h" 

♦include " . . /sun/dklabel . h" 

♦include ”.. /machine /psl . h" 

♦include " . . /sundev/mbvar.h" 

♦include " . . /sundev/cs35if . h" 

/♦♦include " . . /sundev/cs35io . h"*/ 

♦include " . . /sundev/cs35prm. h" 

♦include " . . /sundev/cs35f lp. h" 

/*****************************************************************************/ 
/* Function buf_f ree (dev, bp) The interrupt priority must be increased before*/ 
/* calling this routine to lock out the interrupts*/ 

/* while waiting for the buffer to become avail- */ 

/* able. If the buffer is busy, the driver will */ 

/* sleep until it becomes free. */ 

/*****************************************************************************/ 

buf_f ree (dev, bp) 
dev_t dev; 
struct buf *bp; 

{ 


while (bp->b_f lags & B_BUSY) 

{ 

bp->b_f lags B_W ANTED; 

s leep ( ( caddr__t ) bp, PRiBIO) ; 
bp->b_f lags &= ~B_WANTED; 

} 

bp->b_flags |= B_BUSY; 
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wakeprocess (bp) 


**** 


Copyright (C) Ciprico Incorporated 1987. 

struct buf *bp; 


**** 



{ 


**** 


Ciprico Incorporated 



**** 


2955 Xenium Lane 

bp->b flags 4- ~B BUSY; 


**** 


Plymouth, MN 55441 

if (bp->b flags 4 B WANTED) 


**** 


(612) 559-2034 

{ 


**** 



wakeup ( (caddr t)bp); 


**** 

Module Name: 

cs35prm. h 

bp->b flags *« -B WANTED; 



Package: 

Rimfire 3500 Driver for UNIX Sun OS on VME bus 

> 


**** 

Module Rev: 

SRevisionS **** 

> 


**** 

Date: 

$Date$ **** 

/********************************************************** 

***************** / 

**** 





**** 

Subroutines : 


/********************************************************** 

****************** 

**** 



* 

* 

**** 

Description: 


* ROUTINE SCSI_RESERVE() 

* 

**** 

This 

is an include file for Rimfire 3500 driver. It contains 

* 

* 

*★** 

configuration parameters that may change often. 

★ PURPOSE: Set up and issue SCSI Reserve device command 

* 

**** 




SC SI_RE SERVE (dev, PB, lrfdinf o, MINER, bp) 
struct mb_device *dav; 

PARMBLK PB; 

struct deviceword *lrfdinfo; 
register int MINER; 
struct buf *bp; 


PB.scdb.cmd - SC_RESERVE; 

PB. target id - lrfdinf o->tag_id; 

PB.scdb.bytel - lrfdinf o->log_unit « 5; 

PB. flags - VALID; /* Don't include data phase for this cmd 

if (rf sdcmd (sPB, dev->md_mc, lrfdinf o->dev_index) ) 

{ 

/★DEBUG (0x201, printf ("cfopen: reserve device failed\n"); 
errco - ENXIO; 
return (errco) ; 

} 

> 

/************************************************************************ 

* 

* ROUTINE SCSI_RELEASE{) 

* 

* PURPOSE Set up and execute SCSI Release device command 


SCSI_RELEASE (dev, PB, lrfdinf o, MINER, bp) 
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struct device_word *lrfdinfo; 
register int MINER; 
struct buf *bp; 

{ 

PB.scdb.cmd - SC_RELEASE; 

PB. targetid - lrfdinf o->tag_id; 

PB.scdb.bytel - lrfdinf o->log_unit « 5; 

PB. flags ** VALID; /* Don't include data phase for this cmd */ 

/* Release the device */ 

if (rf sdcmd (&PB, dev->md_mc, lrfdinf o->dev_index) ) 

printf ("release device %x failed\n", bp->b_dev) ; 
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Revision History 


Revision Date Author 

Description of Change 


1.1 07/14/86 Urnesh Gupta 

Pre-Release . 

1.1 08/20/87 D. A. Dickey 

Initial A Release. 

$Log: I:\software\drivers\rf3500\sun\2_0\vcs\cs35prm.h_v $ 


Rev 2.0 07 Apr 1989 13:39:56 JMartin 

Initial revision. 

2.0 04/05/89 J. Martin 

Added changes for multiple controllers. See cs35.c for detail 


09/06/89 Jody Martin 

1. Made changes to driver to support the Rimfire 3523. See cs 
revision history for details. 
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#ifdef lint 

static char Sccsh3id[] 
#endif 


"8 (#) cs35prm.h (75222006) Copyright Ciprico Inc. 1987 
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/* Defines for operations that this driver can do. */ 

/* These may apply across device types or be device type specific. */ 
/* These defines appear in the specific mb_device structures as */ 

/* md_flags for the units. 


♦define N00PN_RDCAP 
♦define NOOPN_MDSEL 
♦define ONEFILEMARK 
♦define GEN MODE 


♦define NORESERVE 
♦define 0S9FL0PPY 
♦define SYNCHRONOUS 
♦define LONGRDYWAIT 
♦define EXABYTE 
♦define FIXEDBLK 


0x000001 

0x000002 

0x000004 

0x000008 


0x000010 

0x000040 

0x000080 

0x000100 

0x000200 

0x000400 


Do Not issue Read Capacity at open() */ 

Do Not issue Mode Select at open() call. 
Tape drive can only write 1 filemark at a 
Tape drive has "modes" of operations. */ 
Add this if you can only do certain */ 
commands (i.e., MODE SELECT) when the */ 
drive is in "general" mode */ 

(in contrast to "read" or "write" mode*/ 
Don't do Reserve & Release commands */ 
This is an 0S9 compatible floppy (sectors 
This drive is synchronous... */ 

This drive may take a while to pass test 
This is a vendor unique parameter to ha 
Force fixed blk mode if EXABYTE */ 


♦define REQLENLO 
♦define REQLENHI 


0x000800 /* Amount of extended sense bytes expected*/ 

0x001000 /* when firmware will issue the Request 

/* sense cmd after a check condition status. REQLENLO and REQLENHI form a 
/* binary representation of the size of the extended status desired. Note 
/* the table below: 

/************************************************************************ i 

/* REQLENHI REQLENLO REQUEST SENSE COUNT 

/* 0 0 8 (default) 


16 

24 


*********************** 


♦define NORETRYSOFT 
♦define S0RTCMB 


♦define NOREWIND 
♦define ONEFM 


/* Manufacturer specific 
/* TAPE DEVICES */ 
♦define Archive 
♦define Archivenr 
♦define Exabyte 


V 
*/ 
*/ 
*/ 

**/ 

V 
*/ 
*/ 
*/ 
*/ 

********************** / 


/* Don't retry soft errors, but print */ 

/* the status block on the screen */ 

/* Enable Sort and Combine for this device 

* Note: tape devices should not use this 

* feature. To use this feature your board 

* must have firmware rev 9 or greater for 

* the 3500, and any non beta firmware 

* for the 3510 controller. */ 

/* This is a no rewind device for tapes*/ 

/* This flag terminates tape with 1 EOF 
(like sun) instead of two. Be careful 
when using this flag. If it is desired 
to append files to the end of a tape, it 
may be hard to determine where that is 
as a filemark gets written between files 
also. 


(TP_NORMAL) 

(TP_NORMAL | NOREWIND) 

(TP_NORMAL I NOOPN_RDCAP | NORESERVE | EXABYTE) 
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************** 


********* 


♦ifdef sun3 /* 1.2a */ 

# define VME_ADD_MOD OxOD 

♦else 

# define VME_ADD_MOD 0x3D 

♦endif 


/* VME address modifier for Ext Sup */ 
/* VME address modifier for Std Sup */ 


/* Data transfer control between controller and VME memory */ 

♦define CNTRL ( C TRLSE T+C TRLWI D ) /* no swap, 32 bit xfer */ 


♦define THROTTLE 


/* Bus throttle */ 


********************* 


♦define SELJTIMEOUT 10 

♦define RFSD_RESET_DELAY 

♦define PRINT_SB_HEADER 1 
♦define PRINT_TARGE T_ID 0 
♦define PRINT_REC0V_ERRORS 0 


/* SCSI selection timeout */ 

/* seconds to delay after SCSI -bus reset 


♦define 

♦define 

♦define 

♦define 

♦define 

♦define 

♦define 

♦define 

♦define 

♦define 

♦define 

/* DISK 
♦define 
♦define 
♦define 
♦define 
♦define 
♦define 
♦define 
♦define 
♦define 
♦define 
♦define 
♦define 
♦define 
♦define 


Exabytenr 

ExabyteF 

ExabyteFnr 

HPTP 

HPTPnr 

Kdy 9612 

Kdy 9612nr 

Patriot 

Patriotnr 

WANGTEK 

WANGTEKnr 

DEVICES */ 

Fujitsu 

FujitsuS 

HP 

HPS 

Micropolis 

MicropolisS 

Maxtor 

MaxtorS 

Miniscribe 

Quantum 

Wren 

WrenS 

Other 

Generic 


(TP_N0RMAL I N00PN_RDCAP | NORESERVE | EXABYTE | NOREWIND) 
(TP_N0RMAL | N0OPN_RDCAP | NORESERVE | EXABYTE | FIXEDBLK) 
(TP_NORMAL I NO0PN_RDCAP | NORESERVE | EXABYTE | NOREWIND | FIXEDB 
( TP_N0RMAL | ONEFM) 

(TP_NORMAL | ONEFM | NOREWIND) 

(TP_N0RMAL |NOOPN_MDSEL | NORESERVE ) 

( TP_NORMAL | NOOPN_MDSE L | NORESERVE | NOREWIND) 
(TP_NORMAL|GEN_MODE INORESERVE) 

( TP_NORMAL I GEN_MODE | NORESERVE | NOREWIND ) 

( TP_NORMAL | ONEF ILEMARK | GEN_MODE ) 

(TP_NORMAL I ONEFILEMARK | GEN_M0DE | NOREWIND) 


(WD_NORMAL) 

(WD_NORMAL | SYNCHRONOUS) 

(WD_NORMAL) 

(WD_N0RMAL | SYNCHRONOUS) 

(WD_NORMAL) 

(WD_N0RMAL | SYNCHRONOUS) 

(WD_N0RMAL) 

<WD_NORMAL | NOOP N_MD S E L | NORESERVE | SYNCHRONOUS) 
(WD_NORMAL | NOOPN_MDSEL) 

(WD_N0RMAL) 

(WD_NORMAL) 

(WD_NORMAL | SYNCHRONOUS) 

(WD_NORMAL) 

(WD_NORMAL) 


/* The "normal" unitops: */ 

♦define WD_N0RMAL (0) 

♦define TP_NORMAL (0) 

/* A byte to tell us what device type the units are... this is the device */ 
/* type according to the ANSI spec. */ 

/* Also, this must match the flags field of mb_device. */ 

/* This means that there is a maximum of 50 devices allowed */ 
static unsigned char utype[50]f 
♦define DIR_ACC 0 /* 

♦define SEQ_ACC 1 /* 

♦define PRN 2 /* 

♦define PROC 3 /* 

♦define WORM 4 / 

♦define RDONLYDIR_ACC 5 /> 

♦define LUN_NOTPRES 
♦define FLOPPY 
♦define DUMMY 
static char *type_names[) 

"Direct Access", 

"Sequential Access", 

"Printer", 

"Processor" , 

"Write Once Read Many", 

"Read Only Direct Access” 

); 


0x7F 
DIR_ACC 
0x90 

{ 


Direct Access device - probably disk */ 
Sequential Access deive - tape */ 

Printer */ 

Processor */ 

Write Once Read Multiple - optical disk */ 
Read Only Direct Access device - optical disk 
Logical Unit Not Present */ 
floppy device */ 

Dummy device for use with cs35ut */ 
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DEST 

EXTHDRS 


HDRS 

DFLAGS 

CFLAGS 

LD FLAGS 

LIBS 

DLIBS 

LINKER 

MAKEFILE 

OB JS 


- /etc 

- /usr/include/ctype .h \ 
/usr/include/curses . h \ 
/usr/include/fcntl .h \ 
/usr/include/sgtty .h \ 
/usr/include/stdio.h \ 
/usr/include/aun/dltio.h \ 
/usr/include/sun/dklabel .h \ 
/usr/include/sya/errno.h \ 
/usr/include/sys/fcntlcora. h \ 
/usr/include/sys/filio.h \ 
/usr/include/sys/ioccom.h \ 
/usr/include/sys/loctl .h \ 
/usr/include/sys/sockio.h \ 
/usr/include/sys/stat .h \ 
/usr/include/sya/sysmacros .h \ 
/usr/include/sys/ttold.h \ 
/uar/include/sys/ttychars.h \ 
/uar/include/sya/ttycom.h \ 
/uar/include/sya/ttydev. h \ 
/uar/include/sy a/types. h \ 
/usr/include/time.h 


- $ (DFLAGS) 


- -lcuraea -ltermlib 


- cc 

- Makefile 
= cs35ut.o 


PRINT 

PROGRAM 

SRCS 


- pr 

* ca35ut 
= ca35ut.c 


/******************************************************************************* 
****** ************************************************************************** 




**** 

**** 


**** 

**** 


**** 

**** 

**** 





Module Name: 
Package : 
Module Rev: 
Date: 


Copyright 1987 Ciprico, Inc 

Ciprico Incorporated 
2955 Xenium Lane 
Plymouth, MN 55441 
(612) 559-2034 

cs35ut . c 

Rimfire 3500 Driver for Unix Sun OS 
$Reviaion$ *** 

$Date$ **** 


Subroutines: 


main, help, opendevice, afm, 
doformat, debug, domap, 
dopartitions, newconf, 
askpartitions, setpartitions, 
showstatistics, doslip 


wfm, rew. 


getpartitions. 



Description: **’ 

This program is a utility to work hand in hand with the **' 

Rimfire 3500 SCSI host bus adaptor. It supports formatting **** 
and sector mapping. It allows access to some of the data **’ 
structures used in the Rimfire 3500 device driver for **> 

configuring and partitioning purposes. **■ 


i************************************************************************* 


all: 

$ (PROGRAM) : 


clean: ; 


$ (PROGRAM) 

$ (OBJS) $ (DLIBS) 

0echo -n "Loading $ (PROGRAM) ... " 

0$ (LINKER) $ (LD FLAGS) $ (OBJS) $ (DLIBS) $ (LIBS) -o $ (PROGRAM) 
8echo "done” 

0rm -f $ (OBJS) 
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depend:; 0mkmf -f $ (MAKEFILE) PR0GRAM=$ (PROGRAM) DEST=$ (DEST) 

index:; 0ctags -wx $ (HDRS) $ (SRCS) 

install: $ (PROGRAM) 

0echo Installing $ (PROGRAM) in $ (DEST) 

0install -s $ (PROGRAM) $ (DEST) 

print:; 0$ (PRINT) $ (HDRS) $(SRCS) 

program: $ (PROGRAM) 

tags: $ (HDRS) $ (SRCS) ; 0ctags $(HDRS) $ (SRCS) 

update : $ (DEST) /$ (PROGRAM) 


$ (DEST) /$ (PROGRAM) : $ (SRCS) $ (DLIBS) $ (HDRS) $ (EXTHDRS) 

0make -f $ (MAKEFILE) DEST=$ (DEST) install 

saber_src: $(SRCS) 

#load $ (CFLAGS) $ (SRCS) 

saber_ob j : $ (OBJS) 

#load $ (CFLAGS) $ (OBJS) 

### 

cs35ut . o : /usr/include/ctype. h /usr/include/sys/types . h \ 

/usr/include/ sys/sysmacros . h /usr/include/sys/stat .h \ 

/usr/include/fcntl .h /usr/include/sys/fcntlcom.h /usr/include/time .h \ 
/usr/include/sys/errno.h /usr/include/sun/dklabel .h \ 
/usr/include/sun/dkio.h /usr/include/sys/ioctl .h \ 
/usr/include/sys/ttychars . h /usr/include/sys/ttydev .h \ 
/usr/include/sys/ttold.h /usr/include/sys/ioccom.h \ 
/usr/include/sys/ttycom.h /usr/include/sys/filio.h \ 

/usr/include/sys/sockio.h /usr/include/curses .h /usr/include/stdio.h \ 
/usr/include/sgtty . h 


/******************************************************************************* 

* Revision History * 

* * 
******************************************************************************** 

Revision Date Author 

Description of Change 


1.1 04/13/87 D. A. Dickey 

Initial B Release for Rimfire 3500 

1.1 08/20/87 D. A. Dickey 

Initial A Release for Rimfire 3500 

$Log: I:\software\drivers\rf3500\sun\2_0\vcs\cs35ut.c_v $ 

Rev 2.0 21 Apr 1989 10:56:40 JMartin 

Initial revision. 

2.0 04/05/89 J. Martin 

Changes for Multiple controllers. See cs35.c for details. 


$Log$ 

2.1 09/06/89 Jody Martin 

1. Made changes to driver to support the Rimfire 3523 as follows: 

- Made changes to support standalone utility. 

- Made many changes to the cs35ut utility, and the driver ioctl 
calls . 

- Made changes to support the new install script. 

- The format disk command now supports including the defect list 
during the disk format . 

- Changed the command codes to match as close as possible to the 
Rimfire 32XX rfutil. 

- Added support for selecting a dummy device to change debug 
value through the utility if you can't open another disk. 

- Added various features to existing commands. 

*****************^********** 1 ******** *******************************************/ 
#ifndef lint 

static char utsccsidf] * "0 (#) cs35ut . c $Revision$ (75222006) $Date$, Copyright 
#endif 


♦define H0G_PARTI TION /* define if you want a "free space hog" partition */ 
♦ifdef STANDALONE 

♦define NO_FLOATS /* Used for floating point failure in standalone */ 

♦endif 
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♦ifdef NO FLOATS 

♦include <ctype.h> 

long Capacity; /* Disk capacity ( in bytes ) */ 

♦include <sys/types ,h> 

♦else 

/*^include <sys/ioctl.h> /* This is included indirectly from curses. h */ 

float Capacity; /* Disk capacity ( in Mbytes ) */ 

♦include <sys/stat.h> 
♦include <sys/sysmacros .h> 

♦endif 

♦include <sys/mtio.h> 

/* 

♦include <fcntl.h> 

* This structure contains the labels used by SUN 4.2 to define the 

♦include <time.h> 

♦ configuration and partitions of a particular disk drive. 

♦include <sys/errno.h> 

* To add a label for a new disk or disk type, duplicate an existing 

♦include "/sys/sun/dklabel . h" 

♦ entry and change the appropriate fields of the structure. 

♦include ”/sys/sun/dkio.h" 

V 

♦include "/sys/sundev/cs35if .h" 
♦include "/sys/sundev/cs35io . h" 
/♦♦include "/sys/sundev/cs35err .h"*/ 

♦ifdef SunOS3 

♦include "/sys/sundev/cs35prm. h” 

static struct dk label labels [] » ( 

♦include "/sys/sundev/cs35flp.h" 

/* ape gapl gap2 intrlv ncyl acyl nhead nsect bh 

♦include "/sys/sundev/cs35int . h" 

{ "edit current label", "", 


o 

o 

o 

o 

o 

o 

o 

o 

♦include <curses.h> 

o o 
o o 

o o 
o o 

o o 
o o 

o o 
o o 

♦define DEFDEVICE "/dev/rrs0a\000 " /* The default device to open at 

DKL MAGIC, 0 

static int disk - -1; 
static char diskname [100] ; 
static char line [256]; 

>i 

>; 

struct dk_map diskparts [NDKMAP] ; 
static WINDOW *verwin, ♦paramwin; 

struct dk_label label; 

static int dev_id; 

♦endif /* SunOS3 */ 

char inp_char(); 

♦ifdef SunOS4 

/* Mode Sense - Mode Select menu for tape devices */ 

static struct dk label labels [] - { 

char *menu[] - { 

/* ape gapl gap2 intrlv ncyl acyl nhead nsect bh 

"1. Speed code (hex):", 

{ "edit current label", "", 0, 0, 

"2. Buffered flag (1 - buffered):", 

o 

o 

o 

o 

o 

o 

o 

o 

"3. Density code (hex):", 

o 

o 

o 

o 

o 

o 

o 

o 

”4. Block Length (hex):" 

{ 0, 0 ), < 0, 0 ), { 0, 0 }, { 0, 0 ), 

); 

DKL_MAGIC, 0 

/* global variables used in mode sense - mode select command */ 
int speed, buffered, density, blklen; 

} ; 

struct dk_label label; 

/* Pointer to global variables used in mode sense - mode select command */ 
int *params[4] - ( & speed, ^buffered, ^density, ablklen }; 

♦endif /* SunOS4 */ 

/* Read defect list menu for format command */ 

/* 

char ^defect menu[] « { 

* This array defines strings which are used as labels when modifying the 

"1. Manufacturers defect list read from disk", 

* disk configuration portion of the label. They should be ordered exactly 

”2. Grown defect list read from disk”, 

* as they are in the label structure. 

"3. Both the Manufacturers and the Grown list" 

}; 

*/ 

static char *f ieldnames [ ] = { /* starting with dkl ape */ 


"♦ of alt/cylinder" , 

/* User entered defect list selection from the defect menu */ 

"size of gapl", "size of gap2", "interleave factor". 

byte defect byte2[] - { 

"♦ of data cylinders”, ”# of alt cylinders", ”♦ of heads”, 

0, /* Don't include defect list data during format */ 

”♦ of sectors/track", "label location", "physical partition ♦", 

0x10, /* Include the manufacturers defect list during format */ 

NULL 

Nov 28 12:10 1989 cs35ut.c Page 4 

Nov 28 12:10 1989 cs35ut.c Page 6 

0x8, /* Include the Grown defect list during format */ 

0x18 /* Include the both the Grown and Manufacturers defect list */ 

); 

}; 

void print_partitions ( ) ; 

/* Defect list formats - to be used with the format command */ 
byte defect_lst_fmt [] - { 


0, /* Block Format */ 

0x4, /* Index Format */ 

0x5 /* Physical Sector Format */ 

>; 


char * month [12] » { "Jan", "Feb", "Mar", "Apr", "May", "Jun", 


"Jul", "Aug", "Sep", "Oct", "Nov", "Dec" }; 


extern char *sys_errlist [] ; 

extern int errno; 


♦define MEG (1000L * 1000L) /* 1 megabyte in bytes */ 

♦define MINPART (0) /* Smallest partition index */ 

♦define MAXPART (NDKMAP) /* Largest partition index */ 

♦define NBASE ('a') /* Partition base */ 


/* 

* The "free space hog" values are MINPART . . MAXPART- 1 or the following 

*/ 


♦define NO_HOG -1 /* No hog partition */ 


♦ifdef HOG PARTITION 

♦define DEFAULT_HOG (MINPART+6) /* Default - 'g' */ 

♦else 

♦define DEFAULT HOG NO HOG 

♦endif 


int Hog = DEFAULT_HOG ; 


static char over lap [MAXPART] [ (MAXPART * 2) + 1] ; 
/* 

* Added macros - Note SECTSIZE is 512 

*/ 


/* 


* Convert blocks to megabytes - unless NO_FLOATS - then it converts 

* blocks to bytes 
*/ 


♦ifdef NO FLOATS 

♦define BTOMEG(x) <(long)((x) * SECTSIZE)) 

♦else 

♦define BTOMEG(x) ( (float) ( (x) * SECTSIZE) / MEG) 

♦endif 


/* These global variables were added for "smart" partitioning */ 
daddr_t Blocks; /* ♦ total blocks on the drive */ 

daddr_t Cblocks; /* ♦ blocks/cylinder */ 
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/******************************************************************************* 
* * 

* Subroutine: main ♦ 

* * 

* Calling Sequence: rfsdutil * 

* * 

♦ Called by: shell * 

* * 

* Calling Parameters: None * 

* Local Variables: None ♦ 

* * 

* Calls Subroutines: * 

* help, doformat, dogeometry, domap, opendevice, * 

* dopartitions, showstatistics * 

* doverify. * 

* * 

* Public/Global Variables : None ♦ 

* Description: * 

* This loops reading commands from the user and invokes a * 

* subroutine to act as required. * 

* * 
*******************************************************************************/ 

main(ac, av) 
int ac; 
char **av; 

{ 

/♦ Initialize screen, and request device to open */ 
util init(ac, av) ; 
do { 

prompt (); /♦ display ”cs35ut>" prompt */ 

line[0] - inp_char (stdscr) ; /* get user cmd entered ♦/ 

if (isupper (line[0] ) ) /* chng cmd to small if caps */ 

line [0] - tolower (line [0] ) ; 
wmove (stdscr, 3, 0); 
wclrtoeol (stdscr) ; 
waddch (stdscr, ' '); 
wmove (stdscr, 1, 0); 
wclrtoeol (stdscr) ; 
wmove (stdscr, 1, 0); 
waddstr (stdscr, "Command: "); 

/* Below are the commands that are common to all device 
* types - disk, tape, and dummy. 

♦/ 

switch (line[0]) { 
case 'b' : 

waddstr (stdscr, "Debug control"); 
debug ( ) ; 
break; 
case ' c' : 

waddstr (stdscr, "Identify Controller"); 
identify () ; 
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capacity () ; 
help(> ; 
break ; 

#ifdef notyet 

case ' j' : 

waddstr (stdscr, "Unit Options"); 
waddstr (stdscr, " - command not implemented"); 
/♦unitops () ; */ 
break; 
case ' k' : 

waddstr (stdscr, "Read/Write block"); 
waddstr (stdscr, " - command not implemented”); 
/*rdwrt_blk () ; ♦/ 
break ; 

#endif 

case ' u' : 

waddstr (stdscr, "Unload/Stop Device"); 
unload () ; 
help() ; 
break; 

#ifdef notyet 

case ' x' : 

waddstr (stdscr, "Any SCSI command"); 
waddstr (stdscr, " - command not implemented"); 
/*any_scsi () ; */ 
break ; 

#endif 

default : 

/* If the device is disk, the following commands 
* apply, else go on to the tape commands. 

*/ 

if (dev id =- DIR ACC) 

{ 

/♦ The following commands are disk commands 
♦ only. 

♦/ 

switch (line [ 0] ) { 
case ' f ' : 

waddstr (stdscr , "Format disk"); 
doformat ( ) ; 
help(); 
break; 
case ' 1' : 

waddstr (stdscr , "Choose label"); 
dolabel () ; 
help() ; 
bre ak; 
case ' m' : 

waddstr (stdscr, "Map sectors"); 
domap ( ) ; 
help() ; 
break; 
case' n' : 

waddstr (stdscr, "Mode Sense/Select"); 
waddstr (stdscr, " - command not implemented" 
/♦domodsen () ; */ 
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help() ; 

break; 

break; 

case ' r' : 

#ifdef notyet 

waddstr (stdscr, "Read label"); 

case ' h' : 

readlabel () ; 

waddstr (stdscr, "General Options"); 

help() ; 

waddstr (stdscr, " - command not implemented"); 

break; 

/♦General () ; */ 

case 's': 

break; 

waddstr (stdscr, "Show label"); 

case ' i' : 

showlabel () ; 

waddstr (stdscr, "Identify Devices"); 

help() ; 

waddstr (stdscr, " - command not implemented"); 

break; 

/♦identify dev();*/ 

case ' v' : 

break; 

waddstr (stdscr, "Verify disk format"); 

#endif 

doverify ( ) ; 

case ' o' : 

help(); 

waddstr (stdscr, "Open a new device"); 

break; 

opendevice (NOLL) ; 

case ' w' : 

break; 

waddstr (stdscr, "Write label to disk"); 

case ' q' : 

writelabel () ; 

waddstr (stdscr, "Quit"); 

break; 

finish (0) ; 

default : 

break; 

help{); 

#ifdef notyet 

> 

case ' y' : 

) else 

waddstr (stdscr, "Board Statistics”); 

if (dev id — SEQ ACC) 

waddstr (stdscr, " - command not implemented"); 

{ 

/♦brdstat () ;*/ 

/* The following commands are tape commands 

break; 

* only. 

case ' z' : 

♦/ 

waddstr (stdscr, "Reset Controller"); 

switch (line[0]) { 

waddstr (stdscr, " - command not implemented"); 

case ' e' : 

reset () ; 

waddstr (stdscr, "Erase tape"); 

break; 

ers t ape ( ) ; 

#endif 

help(); 

default: 

break; 

/* if device is a dummy device, and the command entered 

case' n' : 

* by the user did not match any of the above commands. 

waddstr (stdscr, "Mode Sense/Select"); 

* then the command is not valid, so return message. 

dodensity ( ) ; 

*/ 

help(); 

if (dev id -= DUMMY) 

break; 

{ 

case ' r ' : 

help(); 

waddstr (stdscr, "Rewind"); 

break; 

rew(); 

) else 

help() ; 

/* The following commands are common to both disk and 

bre ak ; 

♦ tape. 

case ' s' : 

*/ 

waddstr (stdscr, "Search Filemark"); 

{ 

sfm() ; 

switch (line [0] ) { 

break; 

case ' a' : 

case 't' : 

waddstr (stdscr, "Load/Start Device"); 

waddstr (stdscr, "Re-Tension Tape"); 

load() ; 

reten () ; 

help(); 

help() ; 

break; 

break; 

case ' d' : 

case ' w' : 

waddstr (stdscr, "Read Capacity"); 

waddstr (stdscr, "Write Filemark"); 
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#ifdef notyet 


wfrn() ; 
help() ; 
break; 
default : 

help() ; 

wmove {stdscr, 3, 0) ; 

waddstr (stdscr, "Illegal command ; 


wmove (stdscr, LINES-1, 0) ; 

wrefresh( stdscr) ; 

del win (verwin) ; 

endwin () ; 

printf ("Nn") ; 

exit (val) ; 


) /* tape command switch */ 

} /* separate disk and tape commands 

/* common disk and tape cmd switch */ 

Common command switch */ 


wmove (stdscr, 1, 0) ; 
w in sch (stdscr, • '); 
winsch (stdscr, ' t'); 
winsch(stdscr, 's'); 
winsch (stdscr, 'a'); 
winsch (stdscr, 'L'); 
) while (TRUE) ; 
/★NOTREACHED*/ 


/* This routine displays the "cs35ut>" prompt. */ 
prompt () { 

register char *fmt - "cs35ut> 

wmove (stdscr, 2, 0); 
wprintw (stdscr, "%-*s”, COLS, fmt); 
wmove (stdscr, 2, strlen ( f mt ) ) ; 
wrefresh(stdscr) ; 


char 

inp_char (win) 
register WINDOW *win; 

( 

register char ch; 
register int x, y; 


wre fresh (win) ; 
getyx(win, y, x) ; 
ch - wgetch(win); 
if (ch — ' \22' || ch — '\1 

wmove (win, y, x) ; 
clearok (win, TRUE) ; 

> else 

break; 

} while (TRUE) ; 
return (ch) ; 


clriwin() { 

register int i; 
register int cnt; 

cnt - 11 < LINES ? 11 : LINES; 
cnt — 4; 

for (i ” 4; cnt; cnt — ) { 

wmove (stdscr, i, 0) ; 
wprintw (stdscr, "%-*s", 
i++; 


Nov 28 12:10 1989 cs35ut.c Page 12 


Nov 28 12:10 1989 cs35ut.c Page 14 


clrowin() { 

register int i; 

for (i - 11; i < LINES; i++) { 
wmove (stdscr, i, 0); 
wprintw (stdscr, "%-*s", COLS, " "); 


Suspends re-writing of screen until user pn 


input (win, buf) 
register WINDOW *win; 
register char *buf; 

{ 

register char ch; 
register int cnt - 0; 
int cur_x, cur y; 

getyx(win, cur_y, cur_x); 

while (TRUE) { 

wre fresh (win) ; 
ch - inp_char (win) ; 
if (ch — killchar () ) { 
cnt * 0; 

wmove (win, cur_y, cur_x) ; 
wclrtoeol (win) ; 
waddch(win, ' '); 
wmove (win, cur_y, cur_x) ; 

) else if (ch *»« erasechar () && cnt) { 
int nowcur__y, nowcur_x; 
getyx(win, nowcur_y, nowcur_x); 
— nowcur_x; 

— cnt ; 

wmove (win, nowcur y. nowcur_x) ; 
wclrtoeol (win) ; 
waddch(win, ' '); 
wmove (win, nowcur_y, nowcur_x) ; 
) else if (ch « '\r' || ch == ' \n' ) { 
line [cnt] - '\0'; 
break; 

) else if (ch !»* erasechar ()) { 
line[cnt++] - ch; 
if (waddch(win, ch) -= ERR) ( 
line [cnt] = 'Non- 
return (ERR) ; 

> 


center_line (LINES-1, "<Press Any Key>”); 
inp_char ( stdscr) ; 


finish (val) 
register val; 
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**************** 


Clears the last line of the screen 






/**************** 

clrpak 

Function: 

Inputs: 


int 

clrpakO 

{ 

move (LINES-1, 0) ; clrtoeol(); 

} 

/* The util_init routine initializes the screen routines, and calls the 
* opendevice routine to open a device. 

*/ 

ut il_init (ac, av) 
int ac; 
char **av; 

{ 

register char *defdev - (char *) NULL; 

if (initscr() — (WINDOW *) ERR) ( /* initialize screen routines */ 

error ("Can't init curses."); 
exit (-1) ; 

> 


raw ( ) ; 
noecho () ; 


if (ac > 1) ( 

defdev - *++av; 


if (opendevice (defdev) < 0) { 

wrefresh(stdscr) ; 
endwin () ; 
printf ("\n") ; 

error ("Can't open default device."); 
exit (-1) ; 

) 

help() ; /* display the help menu */ 

init_verwin () ; 
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Subroutine: help 

Calling Sequence: help() 

Called by: main 

Calling Parameters: None 

Local Variables: None 

Calls Subroutines: None 

Public/Global Variables :None 
Description : 

This subroutine prints a short description of the 
commands available. There are different menus for disk 
devices, tape devices, and dummy device. 


clrowin () ; 
clriwin () ; 

wmove (stdscr, 9, 0) ; 

waddstr (stdscr, "Commands available are:"); 


/* Display disk menu for 
if (dev_id ~ DIR_ACC) 

{ 

wmove (stdscr, 11, 
waddstr (stdscr, " 
waddstr (stdscr, " 
waddstr (stdscr, " 
waddstr (stdscr, " 
waddstr (stdscr, " 
waddstr (stdscr, " 
waddstr (stdscr, " 
waddstr (stdscr, " 
waddstr (stdscr, ” 
waddstr (stdscr, ” 
waddstr (stdscr, " 
waddstr (stdscr, " 
wmove (stdscr, 11, 
waddstr (stdscr, " 
waddstr (stdscr, " 
wmove (stdscr, 12, 
waddstr (stdscr, " 
wmove (stdscr , 13, 
waddstr (stdscr, " 
wmove ( stdscr , 14, 
waddstr (stdscr, " 
wmove ( stdscr, 15, 


a disk device 


0 ); 


- load/start device\n"); 
b - debug control \n") ; 
c - identify controller\n") ; 
d - read capacityXn") ; 
e - read defect listXn");*/ 
f - format the drive\n"); 
h - general options\n”) ; 
i - identify devices\n"); 
j - unit optionsXn"); 
k - read/write block\n"); */ 

1 - Choose/Edit a disk labelXn") ; 
m - map sectorsXn"); 

COLS/ 2) ; 

n - mode sense/select\n") ; */ 
o - open a disk deviceXn") ; 

COLS/ 2) ; 
q - quit\n") ; 

COLS/ 2) ; 

r - read and display label\n"); 
COLS/ 2) ; 

s - show labelXn"); 

COLS/ 2) ; 
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init_verwin () { 

if ( (verwin - newwin(0, 0, 11, COLS-50) ) == (WINDOW *) ERR) 
closedevice () ; 
endwin () ; 
printf ("\n") ; 

error("Can't init verify window."); 
exit (-1) ; 

} 

scrollok (verwin, TRUE); 


error (str) 
register char *str; 

{ 

fprintf (stderr, "%s\n", str); 
f flush (stderr) ; 


/* 

/* 


/* 


waddstr (stdscr, "u - unload mediaXn"); 
wmove (stdscr, 16, COLS/ 2) ; 
waddstr (stdscr, "v - verify format\n"); 
wmove (stdscr, 17, COLS/2); 

waddstr (stdscr, "w - write the disk label\n"); 
wmove (stdscr, 18, COLS/2); 

waddstr (stdscr, "x * any SCSI command\n"); */ 
wmove (stdscr, 19, COLS/2); 

waddstr (stdscr, "y - board statistics'^" ) ; */ 
wmove (stdscr, 20, COLS/2); 

waddstr (stdscr, "z - reset control ler\n" ) ; */ 
wmove (stdscr, 21, COLS/2); 
wmove (stdscr, 22, COLS/2); 

} else 

/* Display tape menu for a tape device */ 
if (dev_id ~ SEQ_ACC) 

{ 


} else 

( 


wmove (stdscr, 11 
waddstr (stdscr, 
waddstr (stdscr, 
waddstr (stdscr, 
waddstr (stdscr, 
waddstr (stdscr, 
waddstr (stdscr, 
waddstr (stdscr, 
waddstr (stdscr, 
waddstr (stdscr, 
waddstr (stdscr, 
wmove (stdscr, 11 
waddstr (stdscr, 
wmove (stdscr, 12 
waddstr (stdscr, 
wmove (stdscr , 13 
waddstr (stdscr, 
wmove (stdscr , 14 
waddstr (stdscr, 
wmove (stdscr , 15 
waddstr (stdscr, 
wmove (stdscr, 16 
waddstr (stdscr, 
wmove (stdscr, 17 
waddstr (stdscr, 
wmove (stdscr, 18 
waddstr (stdscr, 
wmove (stdscr , 19 
waddstr (stdscr, 
wmove (stdscr , 20 
waddst r ( stdscr. 


0 ) ; 

a - load/start deviceXn") ; 
b - debug control \n") ; 
c * identify cont roller\n") ; 
d - read capacityXn"); 
e - erase tape\n"); 
h - general optionsXn") ; 
i - identify devices\n"); 
j - unit optionsXn"); 
k - read/write blockXn"); */ 
n - mode sense/select \n") ; 
COLS/2) ; 

o - open a disk deviceXn"); 

COLS/ 2) ; 
q - quitXn") ; 

COLS/ 2) ; 

r - rewind tapeXn"); 

COLS/ 2) ; 

s - search filemarkXn") ; 
COLS/ 2) ; 

t - retension tapeXn"); 

COLS/ 2) ; 

u - unload mediaXn"); 

COLS/ 2) ; 

w - write filemarkXn"); 

COLS/ 2) ; 

x - any SCSI command\n"); 
COLS/ 2) ; 

y - board st atisticsXn" ) ; 

COL S/2) ; 

z ~ reset control ler\n" ) ; */ 


/* Display dummy device menu */ 
wmove (stdscr, 11, 0); 


waddstr (stdscr, "b - debug control Xn"); 
waddstr (stdscr, "c - identify controllerXn") ; 
waddstr (stdscr, ”h - general optionsXn"); 
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waddstr (stdscr, "1 - identify devices\n") ; */ 
waddatr (stdscr, "o - open a disk device\n") ; 
waddstr (stdscr, "q - quit\n"); 
waddstr (stdscr, "y - board statistics\n") ; 
waddstr (stdscr, "z - reset controller\n") ; */ 


wrefresh (stdscr) ; 


onceonly * TRUE; 

) 

wrefresh (stdscr) ; 
wmove (stdscr, 5, 0); 

if ((disk » open(line, 0_RDWR) ) < 0) { 

if (line [0] «= '\0' || line[0] — '\33') { 

disk « -1; 
return (disk) ; 

) 

wprintw (stdscr, "Can't open: %-40s\n", line); 
wprintw (stdscr, "open: %-4 0s\n", sys_errlist [errno] ) ; 
continue; 


wclrtoeol (stdscr) ; 
break; 

} 

strcpy (disknarae, line); 

/* Get the device type from the rfdinfo array, thru this ioctl call */ 
if (ioctl (disk, RFIOCGDEVID , &dev_id) < 0) { 

wprintw (stdscr, "RFIOCGDEVID: %s", sys_errlist [errno] ) ; 
return (-1); 

} 

/* If dummy device, just display open device, size, and help menu. */ 
if (dev_id — DUMMY) 

( 

wmove (stdscr, 4, 0); 
wprintw (stdscr, "DUMMY Device"); 
wrefresh (stdscr) ; 
size « 0; 

wmove (stdscr, 0, 0); 

wprintw (stdscr, "Open Device: %-30s Size: %-10u", diskname, s 
help() ; 
return (disk) ; 

} 

wmove (stdscr, 0, 0); 
if (getpartitions (diskparta) < 0) ( 
wmove (stdscr, 13, 0); 

wprintw (stdscr, "Can't get partitions from %s\n", diskname); 
closedevice ( ) ; 
return (-1) ; 

) 

fifdef notyet 

/* Try to read the label if this is a disk */ 
if (dev_id mm DIR_ACC) 

{ 

lseek (disk, 0L, 0); 

if (re ad(disk, (char *)&label, sizeof (struct dk_label) ) < 0) { 
waddstr (stdscr, "Disk label was not readable\n") ; 


Nov 28 12:10 1989 cs35ut.C Page 20 


Nov 28 12:10 1989 cs35ut. 


Calling Sequence: opendevice () 


Calling Parameters: None 

Local Variables: None 

Calls Subroutines: None 

Public/Global Variables: 

line - buffer for reading user input 

disk - file descriptor of device file opened. 

Description : 

This subroutine reads a line from the user which it then 
attempts to open as device file. If a device file is already 
open, it is closed. If the open fails, "disk" is set to -1. 


if (diskname [strlen (diskname) - 3] **= 's') 
part ■ diskname [strlen (diskname) - 

else 

part ■ 0; 

size - diskparts [part] .dkl^jnblk; 

wprintw (stdscr, "Open Device: %-30s Size: 

help() ; 
return (disk) ; 


%-10u", diskname, size); 


closedevice () { 

close (disk) ; 
disk = -1; 

wmove (stdscr, 0, 0); 

wprintw (stdscr, "Open Device: %-30s Size: %-10u", "(None)", 0) ; 

} 

opendevice (dname) 
register char *dname; 

( 

register onceonly « FALSE; 
struct st at statb; 
int part, size; 

if (disk !« -1) { 

closedevice () ; 


for (;;) ( 

wmove (stdscr, 4, 0); 

wprintw (stdscr, "%-50s", "New Device: "); 

wmove (stdscr, 4, 12); 
line [0] - ' \0' ; 
wrefresh(stdscr) ; 

if (dname ~ (char *) NULL || onceonly) 
input (stdscr, line); 

else { 

strcpy (line, dname); 
waddstr (stdscr, line); 
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Subroutine : 


***************** 

doformat 


********** 


} else 

{ 

waddstr (stdscr, "No"); 

) 


Calling Sequence: 
Called by: 

Calling Parameters: 
Local Variables: 


doformat () 

main 

None 


fmt - disk format structure to pass to the driver 
lastcyl - last cylinder requested 


Calls Subroutines : ioctl - to pass the format command to the driver * 

Public/Global Variables: * 

disk - file descriptor of disk device to format * 

line - buffer for user input * 


Description: * 

This subroutine asks the user what portion of the disk to * 

format and then proceeds to format the specified area on a * 

cylinder by cylinder basis. * 


doformat () 
{ 


format fmt; 

register struct dk_label *lp; 
dword *lba, *len; 
read_cap cap; 
int i; 

int deflst_sel; 
int list_fmt; 
int good_de f list - 0; 
int time; 

clriwin {) ; 
clrowin O ; 

wmove (stdscr, 5, 0); 
if (disk — -1) ( 

waddstr (stdscr, "You must open the disk first."); 
return; 

> 

lp - & label; 

lba = (dword *)*cap; 

len * (dword *) cap .blklen ; 

♦lba - 0; 


wmove (stdscr, 12, 0); 

waddstr (stdscr, "What interleave? "); 

input (stdscr, line) ; 

fmt . interleave * atoi(line); 

wmove (stdscr, 14, 0); 

wprintw (stdscr, "Formatting blocks 0 to %u in approximately %d minutes. \ 
wprintw (stdscr, "This time will vary according to disk manufacturer\n") ; 
waddstr (stdscr, "Are you sure? "); 
line [0] - inp_char (stdscr) I 040; 
if (line[0] 1- 'y') ( 

waddstr (stdscr, "No"); 

pak(); 

return ; 

> 

waddstr (stdscr, "Yes"); 

wmove (stdscr, 16, 0); 

waddstr (stdscr, "Formatting: \n" ) ; 

/♦clrowin () ; */ 
wre fresh (stdscr) ; 
err no » 0; 

if (ioctl (disk, RFIOCFMT, afmt) < 0) { 

wprintw (stdscr, "RFIOCFMT: %s", sys_errlist [errno] ) ; 
pak ( ) ; 
return (-1) ; 

> 

wmove (stdscr, 16, 12); 
waddstr (stdscr, "Done"); 

wmove (stdscr, LINES - 3, 0); 

waddstr (stdscr, "Do you want to write the label to the disk? (y/n):"); 
line[0] - inp_char (stdscr) | 040; 
if (line [0] !» 'y') { 

waddstr (stdscr, "No”); 

pak ( ) ; 

return; 

} 

waddstr (stdscr, "Yes"); 
lseek (disk, 0L, 0); 

if (write (disk, (char *)ilabel, sizeof (struct dk_label)) < 0) { 
wmove (stdscr, 8, 0); 

wprintw (stdscr, "Write: %s", sys_errlist [errno] ) ; 

pak ( ) ; 

return; 

) 

pak ( ) ; 


errno - 0; 

if (ioctl (disk, RFIOCRDCAP, &cap) 
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< 0 ) 


capacity () 

{ 
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wprintw (stdscr, "RFIOCRDCAP: %s\n", sys_errlist [errno] ) ; 
waddstr (stdscr, "Getting # of blocks from disk geometry\n") ; 
♦lba - (int) lp->dkl_ncyl * lp->dkl_nhead ♦ lp->dkl_nsect; 


/* A read defect list command will not be done if def_lst_type - 0, 
♦ initialize it to zero. 

♦/ 

fmt . de f_lst_type - 0; 


/* time is set equal to the approximate amount of time to format 

* the specific device. This is just an approximate value. 

* It is determined by multiplying the number of cylinders 

* by the number of heads (number of tracks), and multiplying 

* that value by the amount of time it takes for two revolutions, 

* (.0333333333). 

*/ 

#ifdef NO_FLOATS 

time - (int) ( (lp->dkl_ncyl * lp->dkl_nhead / 30) / 60); 

#else 

time « (int) ((.033333333 ♦ lp->dkl_ncyl * lp->dkl_nhead> / 60); 

iendif 

waddstr (stdscr, "Enter 'y' to include a defect list during format: "); 
line [0 ] - inp_char (stdscr) | 040; 
if ( 1 i ne [ 0 ] — ' y ' > { 

waddstr (stdscr, "Yes"); /* Usr wants defect list */ 

waddstr (stdscr, "\nEnter choice of defect list from menu below: 
/* Display defect list menu options ♦/ 
for (i— 0; i < 3; i++) { 

wmove (stdscr, 8 + i, 0); 

wprintw (stdscr, "%-45.45s \n", defect menu[i]); 

> 

/* Move cursor to top of menu and wait for entry by user */ 
while (TRUE) 

{ 

wmove (stdscr, 6, 46); 

input (stdscr, line); /* Get user input */ 

sscanf(line, "%d", &deflst_sel) ; /* chng from ascii to # 

/* Check for valid menu selection */ 
if (deflst_sel > 0 || deflst_sel < 4) 

{ 

/* Set read defect list cmd blk - byte 2 */ 
fmt . def_lst_type * defect_byte2 [def lst_sel] ; 
wmove (stdscr, 7, 0); 
wclrtoeol (stdscr) ; 
break; 

> 

wmove (stdscr, 7, 0); 

waddstr (stdscr, "Illegal entry, try again\n") ; 
wrefresh(stdscr) ; 

> 


dword *lba, *len; 
read_cap cap; 

clriwin () ; 
clrowin () ; 

wmove (stdscr, 5, 0); 
if (disk — -l) { 

waddstr (stdscr, "You must open the disk first."); 

pak ( ) ; 

return; 

} 

lba - (dword *)acap; 

len = (dword ♦) cap. blklen; 

errno = 0; 

if (ioctl (disk, RFIOCRDCAP, &cap) < 0) { 

wprintw (stdscr, "RFIOCRDCAP: %s”, sys_errlist [errno] ) ; 
pak ( ) ; 
return (-1 ) ; 

) 

wmove (stdscr, 10, 0); 

waddstr (stdscr, " Dec 

wprintw (stdscr, "Last Logical block %5d 

wprintw (stdscr, "Block length %5d 

pak ( ) ; 
return (0) ; 


getblock (which, bp) 
char * which; 
register int *bp; 

{ 

int done, block; 
clriwin () ; 

wmove (stdscr, 5, 0); 

waddstr (stdscr, "'q' to quit\n"); 

if ( 1 (strcmp (which, "Number of"))) 

wprintw (stdscr, "Enter %s Blocks :\n", which); 

else 

wprintw (stdscr, "Enter %s Block:\n", which); 

♦bp * 0; 
done » FALSE; 
while (idone) { 

wmove (stdscr, 6, strlen (which) + 16); 
wclrtoeol (stdscr) ; 

wmove (stdscr, 6, strlen (which) + 17); 

input (stdscr, line); 

wmove (stdscr, 8, 0); 

wclrtoeol (stdscr) ; 

if (line [0] >* '\Q') { 

if ( 1 isdigit (line [0] ) && line[0] !='-') { 


Hex\n" ) ; 

%5x\n", *lba, *lba) ; 
%5x\n", *len, ‘len) ; 
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> 


if ( (line [0] | 040) — 

return (FALSE) ; 

else { 

'q'> 

if (sscanf (line, "%d", 
*bp - block; 
return (TRUE) ; 

iblock) — 1) 


) 

> 

wprintw (stdscr, "Illegal input: %s", line); 


> 


> 

wroove (stdscr, 7, 0); 

waddstr (stdscr, "How many passes do you want to make? "); 
input (stdscr, line); 

if (line [0] — '\0' || (line[0] | 040) — 'q') 

return; 

numtimes » atoi(line); 
if (numtimes < 1) 

numtimes * 1; 
wmove (stdscr, 8, 0); 

wprintw (stdscr, "OK, doing %d verify passes. \n", numtimes); 
wmove (stdscr, 9, 0); 

waddstr (stdscr, "Do you want to map bad sectors as they are discovered? 
line[0] - inp_char (stdscr) | 04 0; 
if (line [0] !- 'y') ( 

waddstr (stdscr, "No"); 
domaps « FALSE; 

) else { 

waddstr (stdscr, "Yes"); 
domaps - TRUE; 

> 

wmove (stdscr, 10, 0); 

waddstr (stdscr, "Ready to verify disk, enter 'y' to proceed: "); 
line [0] - inp_char (stdscr) | 040; 
if (line [0] 1- 'y'> { 

waddstr (stdscr, "No"); 

pak(); 

return; 

> 

sblock - 0; 
eblock - *lba; 


clriwin(); 

wmove (stdscr, 5, 0); 

waddstr (stdscr, "Enter 'y' to verify the whole disk: "); 
line [0] - inp_char (stdscr) | 040; 
if (line [ 0] != 'y') { 

wmove (stdscr, 11, 0) ; 
wclrtoeol (stdscr) ; 
waddch (stdscr, ' '); 
wmove (stdscr, 11, 0); 

if (getblock ("Starting" , ssblock) != TRUE) { 
pak ( ) ; 
return; 

} 

wmove (stdscr, 11, 0); 
wclrtoeol (stdscr) ; 
waddch (stdscr, • '); 
wmove (stdscr, 11, 0); 

if (getblock ("Ending", ieblock) != TRUE) ( 
pak ( ) ; 
return; 

) 

wmove (stdscr, 11, 0); 
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**************** 


Subroutine : 

Calling Sequence: 
Called by: 

Calling Parameters: 
Local Variables: 


doverify 
doverify () 
main 
None 


vfy - disk verify structure to pass to the driver 
lastcyl - last cylinder requested 

Calls Subroutines: ioctl - to pass the format command to the driver 

Public/Global Variables: 

disk - file descriptor of disk device to format 
line - buffer for user input 

Description : 

This subroutine asks the user what portion of the disk to 
verify and then proceeds to verify the specified area on a 
cylinder by cylinder basis. 


********** 


********************** 


*************************** 


doverify () 

{ 

register char *cp; 

int scyl, ecyl, shd, ehd; 

int didverify - FALSE, domaps - FALSE; 

int numtimes, sblock, eblock; 

extern char *strchr(); 

dword *lba, *len; 

re ad_c ap cap; 


clriwin () ; 
clrowin() ; 

wmove (stdscr, 5, 0); 
if (disk — -1) ( 

waddstr (stdscr, "You must open the disk first."); 

pak () ; 

return; 

} 

lba - (dword *)&cap; 

len = (dword *) cap.blklen; 

*lba - 0; 


errno =0; 

if (ioctl (disk, RFIOCRDCAP, &cap> < 0) { 

wprintw (stdscr, "RFIOCRDCAP: %s", sys_errlist [errno] ) ; 
pak ( ) ; 
return (-1) ; 


wclrtoeol (stdscr) ; 
waddch (stdscr, ' ')/ 
wmove (stdscr, 11, 0); 
if (sblock > eblock) { 

wmove (stdscr, 5, 0); 

waddstr (stdscr, "The start location must be before the e 

pak ( ) ; 

return; 

) 

) 

clriwin () ; 

wmove (stdscr, 5, 0); 

wprintw(stdscr, "Verifying Blocks %u to %u\nAre you sure? ", sblock, ebl 
line [0] - inp_char (stdscr) | 04 0; 
if (line [ 0] 'y') { 

waddstr (stdscr, "No"); 

pak ( ) ; 

return; 

> 

waddstr (stdscr, "Yes”); 

wmove (stdscr, 10, 0); 

waddstr (stdscr, "Verifying: \n") ; 

clrowin() ; 

wclear (verwin) ; 

if (ver_blocks (asblock, deblock, domaps, numtimes) != TRUE) 
return; 

wmove (stdscr, 10, 12); 
waddstr (stdscr, "Done"); 
pak ( ) ; 
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ver.dkv badblk, ver.dkv error); 

ver_map (ver) 

wref resh (verwin) ; 

register struct dk_vfy *ver; 

if (domaps) 

{ 

ver map (aver); 

struct dk_mapr map; 

) 

map . dkm fblk - ver->d)tv badblk; 

) 

*sbp +- nsects; 

map. dkm nblk - 1; 

} 

errno - 0; 


if (ioctl (disk, RFIOCMAP, amap) < 0) { 

wmove (stdscr, 13, 0); 

wprintw (stdscr, "RFIOCMAP: %s", sys errlist [errno] ) ; 

wprintw (stdscr, "Block %4d", *sbp) ; 

wre fresh (verwin) ; 

return (TRUE) ; 

return; 

> 

wprintw (verwin, "Block %d mapped. \n", map.dkm fblk) ; 


wrefresh(verwin) ; 

} 
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ver_blocks (sbp, ebp, domaps, numtimes) 

/A****************************************************************************** 

register int *sbp, *ebp, domaps, numtimes; 

* * 

{ 

* Subroutine: debug * 

register int i; 

* * 

struct dk_mapr map; 

* Calling Sequence: debug () * 

struct dk_vfy ver; 

* * 

int nsects; 

* Called by: main * 

struct dk_geom geom; 

* * 


* Calling Parameters: None * 

if <*sbp > *ebp) 

* * 

return (FALSE) ; 

* Local Variables: dbg_var - the debug variable from the driver. * 

wmove (stdscr, 13, 0); 

* Calls Subroutines: ioctl - to pass the ioctl request to the driver 

if (dev id !- DIR ACC) 

* Public/Global Variables: * 

{ 

* disk - file descriptor of disk device to query for the cache * 

wprintw (stdscr, "Verify is only implemented for Floppies and nor 

* line - buffer for user input * 

return (FALSE) ; 

* * 

) 

* Description: * 


* This routine prints out the debug variable and then * 

errno =0; 

* queries the user for a new value. * 

if (ioctl (disk, DKIOCGGEOM, ageom) < 0) { 

* * 

wmove (stdscr, 13, 0); 

*******************************************************************************/ 

wprintw (stdscr, "DKIOCGGEOM: %s", sys errlist [errno] ) ; 


return (FALSE) ; 

} 

debug ( ) 


{ 

unsigned long dbg_var; 

nsects - geom.dkg_nsect; 



clriwin () ; 

if (nsects « 0) { 

wmove (stdscr, 5, 0) ; 

wmove (stdscr, 11, 0); 

if (disk == -l) { 

waddstr (stdscr, "What kind of drive is this? One with zero sect 

waddstr (stdscr, "Please use 'o' to open a disk device file"); 

waddstr (stdscr, "Assuming 35 Sectors Per Track. \n") ; 

return; 

nsects - 35; 

} 

> 


errno * 0; 

while (*sbp <- *ebp) { 

if (ioctl (disk, RFIOCGDEBUG, 4dbg_var) < 0) { 

wmove (stdscr, 13, 0) ; 

wprintw (stdscr, "Get debug: %s", sys_errlist [errno] ) ; 

wprintw (stdscr, "Block %4d", *sbp) ; 

return; 

wref resh(stdscr) ; 

) 

for (i - numtimes; i; i — ) { 

wprintw (stdscr, "The current debug variable setting in hex is: (%x)\n". 

ver.dkv_blkno = *sbp; 

waddstr (stdscr, "Do you want to change it? "); 

if (nsects > (*ebp - *sbp + 1)) 

line [0] ** inp_char (stdscr) ( 040; 

nsects » (*ebp - *sbp) + 1; 

if (line [0] 1= 'y') { 

ver.dkv_nblk ** nsects; 

waddstr (stdscr, "No") ; 

ver.dkv_error * 0; 

return; 

ver.dkv_badblk - 0; 

} 

errno — 0; 

waddstr (stdscr, "Yes"); 

if (ioctl (disk, RFIOCVFY, aver) < 0) ( 


wprintw (verwin, "RFIOCVFY: %s", sys_errlist [errn 

wmove (stdscr, 7, 0) ; 

wref resh (verwin) ; 

wprintw (stdscr, "Debug value in hex: (%x) = ", dbg_var) ; 

return (FALSE) ; 

input (stdscr, line) ; 

} 

sscanf (line, ”%x", &dbg_var) ; 

if (ver .dkv_error !* 0) { 


wprintw (verwin, "Verify failed: block*%d (0x%x)\ 

wmove (stdscr, 8, 0); 
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errno - 0; 

if (ioctl (disk, RFIOCSDEBUG, &dbg_var) < 0) { 

wprintw (stdscr, "Set debug: %s", sys_errlist [errno] ) ; 
return; 

> 

wprintw (stdscr, "Debug value changed to (%x)\n", dbg_var) ; 


wprintw (stdscr, "Number of blocks: %d\n", nblock); 
eblock - sblock + nblock; 
clriwinO ; 

wmove (stdscr, 5, 0); 

wprintw (stdscr, "Enter 'y' to map blocks %d through %d ", sblock, ebloc 
line[0] - inp_char (stdscr) I 04 0; 
if (line [0] 1- 'y') { 

waddstr (stdscr, "No”); 

pak(); 

return; 

) 

waddstr (stdscr, "Yes"); 
map.dkm_fblk - sblock; 
map.dkm_nblk - nblock; 
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errno - 0; 

if (ioctl (disk, RFIOCMAP, 4 map) < 0) { 

wmove (stdscr, 7, 0); 

wprintw (stdscr, "RFIOCMAP: %s", sys_errlist [errno] ) ; 

> 

pak(); 
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/*********************** 


*************** 


/************** 


Subroutine : 

Calling Sequence: 
Called by: 

Calling Parameters: 


domap 
domap ( ) 
main 
None 


Local Variables: 


geom - geometry information for the current device 

map - structure to pass map command to the driver 

sblk, eblk - Starting and End block to map 

tblk - Block to map To 

lblk - Last block on disk 

cp - used to step through the user input 


Subroutine: showpartitions 

Calling Sequence: showpartitions (map) 

Called by: main 

Calling Parameters: 

map - pointer to the partition mapping information 
current_iine - starting line nuntoer for printing 

Local Variables: 

Calls Subroutines: None 

Public/Global Variables :None 


Calls Subroutines: 

ioctl - to get configuration information from the driver 
and to pass the map command to the driver 


Description: 

This subroutine displays the partition mapping information 
passed to it. 


* Public/Global Variables: 

* line - buffer for user input 

* 

* Description: 

* This subroutine asks the user for a range of blocks 

* to map and passes the information to the driver. 

* 

********************************************************************** 


domap ( ) 

( 

struct dk_mapr map; 
daddr_t sblock, eblock, nblock; 
register char *cp; 
extern char *strchr(); 

clriwin () ; 
clrowin () ; 

wmove (stdscr, 5, 0); 
if (disk «« -1) ( 

waddstr (stdscr, "You must open the disk first."); 

pak(); 

return; 

) 

wmove (stdscr, 11, 0); 

if (getblock ("Starting", ssblock) 1* TRUE) 
return; 

wmove (stdscr, 17, 0); 

wprintw (stdscr, "Starting block: %d\n", sblock); 
if (getblock ("Number of", unblock) != TRUE) 
return; 

wmove (stdscr, 18, 0); 


int 

showpartitions (map, current_line) 

register struct dk_map "map; 
register int current line; 

{ 


register struct dk_label *lp; 
register int i, j, n, test; 
register daddr_t end_cyl; 
char print_line [200] ; 
int o_lap; 
int MASK; 

char olap [ (MAX PART * 2) +1] ; 


*****************/ 


lp = & label; 

Cblocks ■» (long) lp->dkl_nhead * lp~>dkl_nsect; 
for (i - LINES < 24 ? LINES : 23; i > 14; i— ) { 
move ( i , 0 ) ; 
wclrtoeol (stdscr) ; 

> 

/* Find overlap for each partition */ 
for ( i - 0; i < MAXPART; i++) 

( 

/* Fill overlap string array with spaces initially*/ 
for ( n = 0; n < ((MAXPART * 2) + 1); n++) { 
olap [n] = ' ' ; 

> 

/* find overlaps for this partition */ 
o_lap = overlap(i); 
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for ( j ' 

{ 


0; j < MAXPART; j++ ) 


if (o_lap & MASK) 


olap [n++] 
olap [n++] 


MASK - MASK « 1; 


olap [MAXPART * 2] - 
strcpy (over_lap [i] , 


NULL; 
olap) ; 


} 


center_line (current_line, 

" starting ending size ") ; 

current_line++; 
center_line (current_line, 

"Partition cylinder cylinder blocks / Mbytes 

current_line++; 

for (i - MINPART; i < MAXPART; i++) { 

if ( Cblocks ~ 0 ) 

end_cyl - (daddr_t)0; 

else 

end_cyl - (daddr_t) (map->dkl_cylno + 

(raap->dkl_nblk / Cblocks) - 1) ; 

#ifdef N0_FL0ATS 

{ 

long tnptnap - BTOMEG ( (long) map->dkl_nblk) ; 
char rem[100]; 

sprintf (rem, "%021d", ( (tmptrcp % MEG) * 100) / MEG); 

sprint f (print_line, 

" %c %c %51d %51d %81d /%51d.%.2s 

NBASE + i, (i — Hog) ? • : » • , 

(long) map->dkl_cylno, 

(end_cyl (long) -1 ? (long)0 : end_cyl) , 

(long) map->dkl_nblk, 
trrptnp / MEG, rem, 
over_lap [i] ) ; 

> 

#else /* ! NO_FLOATS */ 

sprintf (print_line, 

" % c %c %51d %5: 

NBASE + i, (i ~ Hog) ? • : » ', 

( long) map~>dkl_cylno, 

(end_cyl (long) -1 ? (long)0 : ent 
( long) map->dkl_nblk, 

BTOMEG ( (long) map->dkl_nblk) , 
over_lap[i] ) ; 

#endif /* NO_FLOATS */ 

center_line (current_line, print_line) ; 
map++; 

cur rent_l ine++ ; 

) 

return (current_line) ; 


%81d / %7.2f 
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/***********! 


********** 


********** 


Subroutine : 

Calling Sequence: 

Called by: 

Calling Parameters: 
lp 

Calls Subroutines: 


askpartitions 
askpartitions (map) 
dolabel 

label 

get_number 


Public/Global Variables: 

line - user input buffer 

Description: 

This subroutine allows the user to edit the partition 
table passed to it. It steps through each entry, 
displays it, and accepts replacement entries if specified. 


current_partition; 


askpartitions (lp) 

register struct dk_label 

{ 

register int i, first; 
register char *ptr; 
register struct dk_map 
daddr_t mb_til_end; 
daddr_t start_block; 
int ret ; 

register int done; 
char partition; 
int inp; 

#ifdef H0G_PARTI TION 

extern void new_hog(); 


clriwin() ; 
clrowin() ; 

/* If the # of heads, # of cylinders, or # of sectors per track 

* are 0, it doesn't make sense to change the partitions. 

* Display an error message to the screen and return. 


Mbytes left to allocate */ 
starting block # for a partition */ 
generic integer function return value */ 
Loop terminater */ 
current partition name */ 


if (lp->dkl_nhead «*» 

{ 

wmove ( stdscr , LINES 
waddstr (stdscr, " 
waddstr (stdscr, " 
waddstr (stdscr, * 
wrefresh (stdscr) ; 
pak(); 
return; 


lp->dkl_nsect *>«• 0 | | lp->dkl_ncyl 


0 ) 


- 4 , 0 ) ; 

WARNING: Incomplete geometry information. 

# of heads, # of cylinders, or # of sectors 
the 1 command and correct this problem."); 
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> 


/* 

* Have the user enter the "free space hog" partition 

*/ 

#ifdef H0G_PARTI TION 

print_partitions (lp, 5); 
for ( ;; ) { 

wmove (stdscr, LINES - 2, 0); 
wclrtoeol (stdscr) ; 

waddstr (stdscr, "Enter the free space hog partition [n<one>] : " 
inp = inp_char (stdscr) ; 
if ( (inp =» ' \n' ) || (inp == ' \r' ) ) 

break; 

if ( (isalpha (inp) ) && (isupper (inp) ) ) 
inp = tolower (inp) ; 


#endif 


if ( inp =“ (int)'n' ) ( 

/* User doesn't want a free space hog partition */ 

Hog » NO_HOG; 

break; 

) 

else ( 


Hog - 
if ( 


) 

else 

) 

> 

new_hog () ; 

/* H0G_PART I T I ON */ 


inp - NBASE; 

(Hog >=» MINPART) && (Hog <- MAXPART) 
/* Got a good one */ 
break; 


printw ( "Invalid partition '%c'". 


) { 


(char) inp) ; 


for ( ;; ) ( 

print_partitions (lp, 5); 
move (LINES - 3, 0); 
clrtoeol () ; 
first - TRUE; 

/* 

* Have the user pick a partition to change 

*/ 

do { 

if ( i first ) { 

wmove (stdscr, LINES - 1, 0); 

waddstr (stdscr, "Illegal partition, try again"); 

) 

first ” FALSE; 

wmove (stdscr, LINES - 2, 0); 
wclrtoeol (stdscr) ; 

waddstr (stdscr, "Partition to change, <CR> when done: ") 
line [0] =» inp_char (stdscr) ; 
if (llnefO] ' \n' || line[0] »= '\r') 
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return; 

for ( ; Idone ; ) { 

if (isalpha (line [0] ) ) { 

/* Loop until user likes the partition */ 

if (isupper (line [0] ) ) 


line [0] - tolower (line [0] ) ; 

#ifdef HOG PARTITION 

> 

new hog ( ) ; 

> while (line [0] < (NBASE + MINPART) 

#endif 

|| line [0] > (NBASE + (MAXPART - 1))); 

print_partitions (lp, 5); 


move (LINES - 3, 0); 

partition « line[0]; 

printw ( "Partition %c", partition); 

wmove (stdscr, LINES - 2, 0); 

move (LINES - 2, 0); 

clrtoeol ( ) ; 

#ifdef NO FLOATS 

wmove (stdscr, LINES - 1, 0); 

< 

clrtoeol () ; 

long tmptmp - BTOMEG (current__partition->dkl nblk 


char rem(100] ; 

/* Point to the correct partition in the label */ 

sprintf (rem, "%021d", ( (trrptnp % MEG) * 100) / M 


printw ("%ld blocks (%ld.%.2s Mbytes) OK (y/+/-/n 

current_partition « alp->dkl map (partition - NBASE]; 

current_partition->dkl nblk. 


tmptmp / MEG, rem) ; 

/* Print out the partitions */ 

> 


#else /* ! NO FLOATS */ 

print_partitions (lp, 5); 

printw("%ld blocks (%.2f Mbytes) OK (y/+/-/n)? " 

move (LINES - 3, 0); 

current_partition->dkl nblk, 

clrtoeol () ; 

BTOMEG (current_partition->dkl nblk) ) ; 

move (LINES - 3, 0); 


printw ("Partition %c", partition); 

#endi f /* NO FLOATS */ 


ptr * line; 

/* Loop until partition is "approved" by user */ 

*ptr = inp char (stdscr) ; 


if ( (*ptr — 'n') || (*ptr — 'N')) { 

for ( done - 0; idone; ) { 

/♦ User doesn't like partition - wants t 


break; 

/******************/ 

) 

/* Partition loop */ 

else if ( (*ptr — '\n') || (*ptr — 'Y') II (*pt 

/******************/ 

/* User likes this one - done */ 


done =1; 

/* Pick a starting cylinder */ 



/* Recalculate the "hog" partition */ 

for ( ;; ) { 

#ifdef HOG PARTITION 

move (LINES - 2, 0) ; 

new hog ( ) ; 

clrtoeol () ; 

#endif 

move (LINES - 2, 0) ; 

break; 

printw ("Enter the starting cylinder (0-%d, q<uit 

} 

lp->dkl ncyl - 1) ; 

else if ('+' »» *ptr) { 

if ( (ret « get number (& (current_partition->dkl 

/* Increase by one cylinder block and re 

continue; /* Error occured */ 

if ( (current_partition->dkl nblk + Cbloc 


current_partition->dkl nblk +» C 

if ( ret — 3 ) { 

} 

/* User entered 'q' to quit */ 

> 

done = 1; 

else if ('-' “■= *ptr) { 

break; 

/* Decrease by one cylinder block and re 

> 

if ( (current_partition->dkl nblk - Cbloc 


current_partition->dkl nblk -= C 

if ( (current jpartition->dkl cylno >= 0) 

} 

&& (current_partition->dkl cylno 

) 

break; 

) 


/*NOTREACHED*/ 
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/* Print out the partitions */ 

} 

print_partitions (lp, 5) ; 


move (LINES - 3, 0); 


printw ("Partition %c", partition); 


start_block - (daddr_t) current_partition->dkl_cylno * Cb 


/* Pick a size */ 


for ( ; Idone ; ) { 


/♦Calculate Mbytes from start block to end */ 


mb til end * (daddr t) (((Blocks - start block) 


* SECTSIZE + (MEG-1)) / MEG); 


move (LINES - 2, 0) ; 


clrtoeol () ; 


move (LINES - 2, 0) ; 


printw ("Enter the size in megabytes (0-%ld, r<es 


/* current_partition->dkl_nblk gets filled by ge 


* user entered Mbyte value . If the user entere 


* disk, it is set to mb_til_end. 


if ( (ret * get_number (& (current_partition->dkl_ 


continue; /* Error occured */ 


if ( ret — 2 ) 


/* Entered ' return' , no change */ 


break; 


if ( ret — 3 ) { 


/* Entered 'quit' */ 


done - 1; 


break; 

} 


/* If user entered ' r' for rest of disk, calcula 


* nblk by using total number of blocks - starti 


if ( current_partition->dkl_nblk rrb_til_end ) 


current_partition->dkl nblk *» Blocks - s 

} 


else if ( (current_partition->dkl_nblk >- 0) 


&& (current_partition->dkl_nblk 


current_partition->dkl nblk * ( ( ( (curren 


* MEG) /SECTSIZE +Cblocks - 1)/Cb 


if (current_partition->dkl_nblk > (Block 


current_partition->dkl nblk = B1 


} else 


continue; 


/* Print out the partitions */ 


print_partitions (lp, 5); 


move (LINES - 3, 0) ; 


printw ("Partition %c", partition); 


break; 


move (LINES - 2, 0); 


clrtoeol () ; 
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opendevice (diskname) ; /* So as to refresh the possible size change 

return; 


print_partitions 

Function: 

Prints out the partition table plus added info 


lp - pointer to the label 

start_line - line to start printing at 


printjpartitions (lp, start_line) 

register struct dk_label *lp; 
int start_line; 

{ 

register int current_line; 
char display_line [200] ; 


/* Used to display more information 
* after the usual partition info */ 
/* Local storage for display line */ 


/* First display the partition table */ 

current_line - showpartitions (lp->dkl_map, start_line); 
current_line++; 

/* Print out some additional info */ 


char rem[100] ; 

sprint f (rem, "%021d", ((Capacity % MEG) * 100) / MEG); 
sprintf (display_line, 

"Disk capacity: %51d.%.2s Mbytes Total cylinders: %5d", 

Capacity / MEG, rem, lp->dkl_ncyl) ; 


sprintf (display_line, 

"Disk capacity: %7.2f Mbytes 

Capacity, lp->dkl_ncyl) ; 

/* NO_FLOATS */ 

center_line (current_line, display_line) ; 
current_line++; 


Total cylinders: %5d". 
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Calling Sequence: 


setpartitions 
setpartitions () 


dopartitions 


Calling Parameters: None * 

* 

Local Variables: * 

i - looping * 

file - to open the device file for each partition * 

cp - pointer to partition character of device file name* 

Calls Subroutines: * 

ioctl - to set partition information for each partition * 

* 

Public/Global Variables: * 

diskname - device file name of device currently in use * 

Description: * 

This subroutine passes the partition information from * 

"map" to the device driver. * 


Calling Sequence: 


Calling Parameters: 
Local Variables: 


getpartitions 
getpartitions () 


dopartitions 


Description: 

This subroutine gets the partition information from 
the device driver and places it in the array of 
structures pointed to by "map". 
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> 

clrowin ( ) ; 

errno - 0; 

wmove (stdscr, 11, 0); 

if (ioctl (file, DKIOCGPART, amap[i]) < 0> { 

if (disk — -1) { 

wmove (stdscr, 4, 0); 

waddstr (stdscr, "You must open the disk first."); 

wprintw (stdscr, "\nDKIOCGPART : %s\n", sys errlist [errno] 

pak(); 

*cp - savepart; 

return; 

return (-1) ; 

> 

} 

good -0; 

mt.mt op ” MTOFFL; 

close (file) ; 

wre fresh (stdscr) ; 

> 

errno - 0; 

*cp - savepart; 

if (ioctl (disk, MTIOCTOP, amt) < 0) { 

return (good) ; 

wprintw (stdscr, " RF IOCUNLOAD : %s\n", sys errlist [errno] ) ; 

> 

pak () ; 


return (-1) ; 

/**************** ************** ************************************************* 

) 

* * 

return (0) ; 

* Tape Positioning Subroutines: sfm(), reten ( ) , load(), unloadf), * 

) 

* ers_tape(), wfm(), rew() * 


* Calling Sequence: routine () * 

/* This routine causes the tape to be erased from the current tape position 

* * 

* to the end of tape. */ 

* Called by: main * 

ers_tape () 

* Calls Subroutines: ioctl * 

( 

struct mtop mt; 

* Description: * 

clriwin () ; 

* The subroutines listed above are all for tape devices * 

clrowin () ; 

* for positioning the tape, erasing, or writing filemarks. * 

wmove (stdscr, 11, 0); 

* * 

if (disk — -1) { 

******************************* *********** ************************************* / 

waddstr (stdscr, "You must open the disk first."); 

/* Search a filemark - this routine will search forward one filemark. */ 


sfra() 

> 

struct mtop mt; 

wmove (stdscr, 11, 0); 


waddstr (stdscr, "Enter 'y' if you are ready to start the erase: ") ; 

clriwin() ; 


clrowin() ; 

line[0] » inp char (stdscr) | 040; 

wmove ( stdscr, 11, 0); 

if (line [ 0] ! = 'y') < 

if (disk — -1) { 

waddstr (stdscr, "No”); 

waddstr (stdscr, "You must open the disk first."); 

pak ( ) ; 

return; 

} 

return; 

> 

waddstr (stdscr, "Enter number of filemarks to search: ") ; 

waddstr (stdscr, "Yes"); 

wref resh(stdscr) ; 


input (stdscr, line); 

mt.mt op = MTERASE; 

mt . mt_count - atoi(line); 

wref resh( stdscr) ; 

mt.mt op - MTFSF; 

errno => 0; 


if (ioctl (disk, MTIOCTOP, amt) < 0) { 

errno =0; 

wprintw (stdscr, " RFIOCERASE : %s\n", sys errlist [errno] ) ; 

if (ioctl (disk, MTIOCTOP, imt) < 0) ( 

pak () ; 

wprintw (stdscr, "RFIOCSFM: %s\n", sys errlist [errno] ) ; 

return (-1) ; 

return (-1) ; 

> 

} 

return (0) ; 
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return (0) ; 

} 

} 


/* This routine will cause one filemark to be written to tape. */ 

/* Retension the tape */ 

wfm{ ) 

reten () 

{ 

( 

struct mtop mt ; 

struct mtop mt; 



clriwin () ; 

clriwin {) ; 

clrowin () ; 

clrowin () ; 

wmove (stdscr, 11, 0); 

wmove (stdscr, 11, 0); 

if (disk == -1) { 

if (disk — -1) { 

waddstr (stdscr, "You must open the disk first."); 

waddstr (stdscr, "You must open the disk first.”); 

pak ( ) ; 

pak(); 

return; 

return; 

} 

} 


mt . mt_op = MTWEOF ; 

mt . mt_op - MTRETEN; 

mt.mt_count = 1; 

wref resh (stdscr) ; 

wref resh (stdscr) ; 

errno * 0; 

errno “0; 

if (ioctl (disk, MTIOCTOP, amt) < 0) { 

if (ioctl (disk, MTIOCTOP, amt) < 0) { 

wprintw (stdscr, "RFIOCRETEN: %s\n", sys errlist [errno] ) ; 

wprintw (stdscr, "WFM: %s\n", sys errlist [errno] ) ; 

pak<); 

pak () ; 

return (-1) ; 

} 

return (-1) ; 

return (0) ; 

> 

} 

return (0) ; 

> 

/* This routine causes the SCSI load command to be issued to the drive. */ 

/* This routine causes the tape to be rewound.*/ 

load () 
{ 

rew () 

clriwin () ; 

( 

struct mtop mt; 

clrowin () ; 


wmove (stdscr, 11, 0); 

clriwin () ; 

if (disk — -1) { 

clrowin () ; 

waddstr (stdscr, "You must open the disk first."); 

wmove (stdscr, 11, 0); 

pak () ; 

if (disk « -1) { 

return; 

waddstr (stdscr, "You must open the disk first."); 

} 

pak () ; 


return; 

wref resh (stdscr) ; 

} 

errno “0; 


if (ioctl (disk, RFIOCLOAD, 0) < 0) { 

mt . mt_op «= MTREW; 

wprintw (stdscr, "RFIOCLOAD: %s\n", sys errlist [errno] ) ; 

wref resh (stdscr) ; 

pak () ; 

errno * 0; 

return (-1) ; 

} 

if (ioctl (disk, MTIOCTOP, amt) < 0) { 

return (0) ; 

wprintw (stdscr, "REWIND; %s\n", sys errlist [errno] ) ; 

} 

pak ( ) ; 


return (-1) ; 

/* This routine causes the SCSI unload command to be issued to the drive. */ 

) 

unload () 
{ 

return (0) ; 

struct mtop mt; 

} 


/*************************«*********** ****************************************** 

clriwin () ; 
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Subroutine: identifyO, 

Calling Sequence: identifyO 

Called by: main 

Calls Subroutines: ioctl 

Description : 

This routine issues the Rimfire 35XX identify command which 
returns the firmware revision of the adapter. 


*************** 


*************** 


identify () 

{ 


RETID 


id; 


’You must open the disk first."); 


clriwin () ; 
clrowin() ; 

wmove (stdscr, 11, 0) ; 

if (disk 1) { 

waddstr (stdscr, 
pak(); 
return; 

) 

wref re sh( stdscr) ; 
errno - 0; 

if (ioctl (disk, RFIOCIDENT, aid) < 0) ( 

waddstr (stdscr, "RFIOCIDENT: %s", sys_errlist [errno] ) ; 

pak(); 

ret urn (-1) ; 

} 

wprintw (stdscr, "\tFW rev: %02d\n 
wprintw (stdscr, "\tEng rev: %02d\n 
wprintw (stdscr, "\tFW date: %s %2d,%2d\n", 

month [id. month - 1], id. day, id. year); 

pak() ; 
return (0) ; 

************* 


id.fwrev & OxFF) ; 
id.engrev & OxFF); 


******************** 




Subroutine : 

Calling Sequence: 
Called by: 

Calling Parameters: 
Local Variables: 


show label 
show label ( ) 
main 
None 


lp - pointer to label 

wp - used to step through configuration info 
cksum - used to calculate the checksum of the label 
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wprintw (stdscr, 
current_line++; 


showpartitions (lp->dkl_map 1 
pak(); 


******************** 
Subroutine : 

Calling Sequence: 
Called by: 

Calling Parameters: 
Local Variables: 
Calls Subroutines: 


%-20s %d\n", fieldnames [i] , *wp++) ; 

(start_line + (field_count / 2) ) + 1) ; 


********** 


readlabel 

readlabel () 

main 

None 

None 

None 


* Public/Global Variables: * 

* disk - file descriptor of device file to read label from * 

* label - disk label structure to read label into * 

* * 

* Description: * 

* This subroutine attempts to read the label from the device file * 

* currently open. * 

*******************************************************************************/ 


readlabel () 


"Please use 'o' to open a disk device file"); 


wmove (stdscr, 5, 0); 
wclrtoeol (stdscr) ; 
wmove (stdscr, 6, 0); 
wclrtoeol (stdscr) ; 
wmove (stdscr, 5, 0); 
if (disk — -1) { 

waddstr (stdscr, 
return; 

> 

lseek (disk, 0L, 0); 

if (read(disk, (char *)&label, sizeof (struct dk_label) ) < 0) { 
wprintw (stdscr, "Read: %s”, sys_errlist [errno] ) ; 
return; 

> 

if (label .dkl_magic 1= DKL_MAGIC) 

wprintw (stdscr, "Warning: Bad magic number (0x%x) in label" 
showlabel () ; 
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i 

Calls Subroutines: 


- looping 

showpartitions - display partition information 
from the label 


Public/Global Variables: 

label - the current label 

Description: 

This subroutine displays the current label. 


*******************************************************************************/ 



*********************** 
Subroutine : 

Calling Sequence: 
Called by : 

Calling Parameters: 
Local Variables: 


writelabel 

writelabel () 

main 

None 

None 


showlabel () 

{ 

register struct dk_label *lp - alabel; 
register int i; 
register unsigned short *wp; 
unsigned short cksum; 

register int field_count, current_line, shift, start_line; 

clriwin () ; 
clrowin () ; 


current_line ** 4; 

wmove (stdscr, current_line, 0); 

wprintw (stdscr, "<%s>\n", lp->dkl_ascii label) ; 

current_line++; 


cksum - 0; 

for (i » 0, wp » (unsigned short *)lp; 

cksum *wp++; 
if (cksum !- lp->dkl_cksum) 

wprintw (stdscr, "Checksum error 
cksum, lp->dkl_cksum) ; 


else 


in 


waddstr (stdscr, "Checksum in label 
current_line++; 


sizeof (*lp)/2-l; i++) 
label, was 0x%04x, should be 


is ok.\n"); 


if (lp->dkl_magic 1- DKL_MAGIC) 

wprintw (stdscr, "Wrong magic number in label: 0x%04x\n", lp->dkl 

else 


waddstr (stdscr, "Magic number in label is ok.\n"); 
current_line++; 

for ( field_count - 0; fieldnames [field_count ] != NULL; f ield_count++ ) 

wp = alp->dkl_apc; 
start_line - current_line; 
shift - 0; 

for (i - 0; fieldnames [ i] !- NULL; i++) { 

if ( current_line — (start_line + (field_count / 2) ) ) { 
current_line = start_line; 
shift - COLS / 2; 

> 

wmove (stdscr, current_line , shift); 


Calls Subroutines: None 


Public/Global Variables: 

disk - file descriptor of device file 
label - disk label structure to write 


to write label to * 
label from * 


Description: 

This subroutine attempts to write the current label to 
the device file currently open. 


writelabel () 

{ 

clriwin () ; 

wmove (stdscr, 5, 0); 
if (disk — -1) { 

waddstr (stdscr, "Please use 'o' to open a disk device file"); 
return; 

} 

waddstr (stdscr , "Ready to write label, enter 'y' to proceed: ") ; 
line[0] - inp_char (stdscr) ; 
if (line [0] !■ ' y' ) ( 

waddstr (stdscr, "No"); 
return; 

} 

waddstr (stdscr, "Write"); 
lseek (disk, 0L, 0); 

if (write (disk, (char *)&label, sizeof (struct dk_label)) < 0) { 
wmove (stdscr , 8, 0); 

wprintw (stdscr, "Write: %s", sys_errlist [errno] ) ; 
return ; 

) 

return; 

} 

/******************************************************************************* 


Subroutine : 
Calling Sequence: 
Called by: 


dolabel 
dolabel () 
main 
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* Calling Parameters: None * 

* * 

* Local Variables: * 

* wp - used to step through configuration info * 

* lp - pointer to label * 

* type - type of label chosen * 

* i - looping * 

* * 

* Calls Subroutines: * 

* ioctl - to pass the label command to the driver * 

* askpartitions - allow user to modify partition * 

* tables in the label * 

* showpartitions - display partitions in the label * 

* Public/Global Variables: * 

* fieldnames - names of the disk configuration fields in the label * 

* * 

* Description: * 

* This subroutine displays the available standard labels * 

* and allows the user to select one or edit whichever label * 

* is currently selected. * 

* * 
***************************************************************** **************^ 

dolabel ( ) 

{ 

read_cap cap; 

dword *lba; 

dword ucyl; 

register int i; 

register unsigned short *wp; 

register struct dk_label *lp; 

int type; 

int x, y; 

page_3 p3; 

page_4 p4; 

inq_data inqdat; 

int offset; 

dword ncyl; 

int nhead; 

unsigned short ape, acyl, nsect, intrlv; 
char ascii_lab[128] ; 

int current_line, start_line, shift, field_count; 

clriwin ( ) ; 
clrowin () ; 

p3.page_code “3; 
p4.page code - 4; 
y = li; 
x = 0; 

wmove (stdscr, 11, 0> ; 
wclrtoeol (stdscr) ; 
wmove (stdscr, 11, 0); 

waddstr (stdscr, "0 - edit current label\n") ; 

waddstr (stdscr, "1 - get disk geometry from the disk thru SCSI mode sens 
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* Determine where, on the screen, the partitions 

* should be printed 
*/ 

for ( field_count * 0; fieldnames [field_count] !- NULL; field_co 

wp - ilp->dkl_apc; 
shift - 0; 

start line » current line - 4; 

for (i - 0; fieldnames ( i ] !« NULL; i++) { 

if ( current_line ■*« (start_line + (field_count / 2) ) ) 
current line « start line; 
shift = COLS / 2; 

) 

wmove (stdscr, current_line, shift); 

wprintw (stdscr, "%-20s %d", fieldnames [i] , *wp++) ; 

current line++; 

) 

showpartitions (lp->dkl_map, (start_line + (field_count / 2) ) +1 
a3kpartitions (lp) ; 

) else { 

l* Issue a mode sense for page 4 to get the number of heads. */ 
if (ioctl (disk, RFIOCMDSEN4 , &p4)) 

{ 

wprintw (stdscr, "RFI0CMDSEN4 : %s\n", sys_errlist [errno] ) 
wref resh(stdscr) ; 
pak ( ) ; 
return; 

) 

ncyl « p4.ncyl_bl; 

ncyl - (ncyl << 8) | p4.ncyl_b2; 

nhead » p4. nhead; 

f* Issue a mode sense for page 3 to get number of sectors 

* per track, interleave value, and alternates per cylinder 
V 

if (ioctl (disk, RF IQCMD SEN 3 , &p3) ) 

{ 

wprintw (stdscr, "RFI0CMDSEN3 : %s\n", sys_errlist [errno] ) 
wref resh ( stdscr) ; 
pak ( ) ; 
return; 

) 

if (p3 . alttpzone ! * 0) 

ape = p3.altspzone / p3 . alttpzone; 

else 

ape = 0 ; 

ape = ape * nhead; 
if (p3 . alttpvol) 

acyl « p3. alttpvol / nhead; 
nsect «= p3.spt; 

/* If nunrtber of sectors is equal to 0, give it a 
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wrefresh(stdscr) ; 

value of 35 and warn the user that this is an 


assumed value. */ 

choose : 

if (nsect »« 0) 

wmove (stdscr, 4, 0); 

( 

wclrtoeol (stdscr) ; 

nsect * 35; 

wmove (stdscr, 4, 0); 

wmove (stdscr, LINES - 2, 0); 

waddstr (stdscr, "Please enter your choice: ") ; 

waddstr (stdscr, "WARNING: Number of sectors per track f 

input (stdscr, line); 

wref resh (stdscr) ; 

if (line[0] «= ' q' ) 

pak ( ) ; 

return; 

) 

if (line [0] ~ '\0' 


|| (type * atoi ( line) ) < 0 

intrlv = p3 . interleave; 

I | type > 1) ( 


wmove (stdscr, 5, 0); 

/* Issue a read capacity command to calculate the number of 

waddstr (stdscr, "Bad choice, please try again."); 

* useable cylinders. 

goto choose; 

} 

* useable cyl = ((read cap blk#) / (# of hds * sec/track)). 

lp = & label; 

*/ 

clrowin () ; 

/* lba = number of blocks after read capacity cmd issued. */ 

if (type — 0) ( 

lba * (dword *)cap.nblk; 

label: 


wmove (stdscr, 6, 0); 

if (ioctl (disk, RFIOCRDCAP, &cap) ) 

waddstr (stdscr, "Please enter an ascii label for the disk (less 

{ 

wprintw (stdscr, "Press RETURN to keep : \n<%s>\n<", lp->dkl asciil 

/* Useable cylinders = total number of cylinders */ 

wclrtoeol (stdscr) ; 

ucyl * ncyl; 

wmove (stdscr, 9, 1); 

) else 

input (stdscr, line); 

{ 

waddeh (stdscr, • >' ) ; 

/* Calculate the number of useable cylinders. */ 

wre fresh (stdscr) ; 

ucyl - (*lba / (nhead * nsect)); 

if (line [0] ' \0' ) { 

) 

if (strlen (line) > 127) { 


wmove (stdscr, 10, 0); 

/* Issue an inquiry command to get the ascii device manufacturer 

waddstr (stdscr, "Label is too long, please try a 

* and device model number to include in the ascii section of 

goto label; 

* the label. 

) else 

V 

strepy (lp->dkl asciilabel, line); 

} 

if (ioctl (disk, RFI0CINQ, sinqdat) ) 


wprintw (stdscr, "RFIOCINQ: %s\n", sys_errlist [errno] ) ; 

newconf (lp) ; 

wref resh (stdscr) ; 


pak ( ) ; 

/* 

return; 

* Calculate some drive characteristics 

*/ 

> 


inqdat . vend__uniq [10] * 0 ; 

Blocks «* (long) lp->dkl_nhead * lp->dkl_ncyl * lp->dkl_nsect; 

inqdat .vend_uniq[ 18] = 0; 

Cblocks « (long) lp->dkl_nhead * lp->dkl_nsect; 


if ( Blocks <= 0 ) 

sprintf (ascii__lab, "%s-%s cyl %d alt %d hd %d sec %d ape %d”, &i 

Blocks * 1; 


if ( Cblocks <- 0 ) 

strepy (lp->dkl^_ascii label, ascii_lab) ; 

Cblocks - 1; 

lp->dkl_apc * ape; 

Capacity - BTOMEG (Blocks) ; 

lp->dkl_gapl «■ 0; 


lp->dkl_gap2 - 0; 

clriwin () ; 

lp~>dkl_intrltf = intrlv; 

clrowin () ; 

lp->dkl~ncyi * ucyl; 


lp->dkl__acyl ** acyl; 

/* 

lp->dkl_nhead * nhead; 
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lp->dkl_nsect - nsect; 



item = 

atoi (line) ; 


/* 



wmove (stdscr, 8, 0); 


* Now Calculate some drive characteristics 



wclrtoeol (stdscr) ; 


V 



wmove (stdscr, 7, 0); 





switch 

(item) { 


Blocks — (long) lp->dkl nhead * lp->dkl ncyl * lp->dkl nsect; 



case 1 : 



Cblocks - (long) lp->dkl nhead * lp->dkl nsect; 




wprintw (stdscr, "1. # of spare sectors per cylinder: 


if ( Blocks <- 0 ) 




waddstr (stdscr, "new value or <CR> for no change: "); 


Blocks - 1; 




input (stdscr, line); 


if ( Cblocks <- 0 ) 




if (line [0] — '\0M 


Cblocks - 1; 




break; 


Capacity - BTOMEG (Blocks) ; 




lp->dkl ape = atoi (line); 






break; 


/* 



case 2: 



* Determine where, on the screen, the partitions 




wprintw (stdscr, " 2. Size of gapl : %u\n”, lp->dkl gap 


* should be printed 




waddstr (stdscr, "new value or <CR> for no change: "); 


*/ 




input (stdscr, line); 






if (line [0] — '\0') 


for ( field_count - 0; fieldnames [field count] !« NULL; field co 



break; 






lp->dkl gapl « atoi (line); 


start line - current line - 4; 




break; 


wmove (stdscr, current line, 0); 



case 3 : 



wprintw (stdscr, "<%s>", lp->dkl asciilabel) ; 




wprintw (stdscr, " 3. Size of gap2: %u\n", lp->dkl gap 


current line++; 




waddstr (stdscr, "new value or <CR> for no change: "); 


wp ” *lp->dkl ape; 




input (stdscr, line); 


start line - current line; 




if (line [0] — '\0') 


shift - 0; 




break; 


for (± - 0; fieldnames [i] i- NULL; i++) { 




lp->dkl gap2 ■» atoi (line); 


if ( current line -« (start line + (field count / 2) ) ; 




break; 


current line - start line; 



case 4 : 



shift - COLS / 2; 




wprintw (stdscr, " 4. Interleave factor: %u\n", lp->dk 


} 




waddstr (stdscr, "new value or <CR> for no change: "); 


wmove (stdscr, current line, shift); 




input (stdscr, line); 


wprintw (stdscr, "%-20s %d", f ieldnames [i] , *wp++) ; 




if ( line [ 0] — '\0') 


current line++; 




break; 


} 




lp->dkl intrlv - atoi (line); 


showpartitions ( lp->dkl map, (start line + (field count / 2) ) + 

1 



break; 


askpartitions (lp) ; 



case 5: 



showlabel () ; 




wprintw (stdscr, " 5. Number of cylinders: %u\n", lp->d 


} 




waddstr (stdscr, "new value or <CR> for no change: "); 






input (stdscr, line); 

#ifdef 

notyet 




if (line [0] — '\0') 


wmove (stdscr, LINES - 2, 0); 




break; 


waddstr (stdscr, "Enter 'y' to write this partition table to the kernel 




lp->dkl ncyl atoi (line); 


line [0] - inp char (stdscr) ; 




break; 


if (line [0] !- 'y') { 



case 6 : 



waddstr (stdscr, "No"); 




wprintw (stdscr, " 6. Number of alt cylinders: %u\n", 1 


pak() ; 




waddstr (stdscr, "new value or <CR> for no change: "); 


return; 




input (stdscr, line); 


} 




if ( line [ 0 ] ~ '\0') 


waddstr (stdscr, "Yes"); 




break; 


wmove (stdscr, current line, 0); 




lp->dkl acyl - atoi (line); 






break; 


setpartitions (lp->dkl_map) ; 



case 7 : 


#endif 





wprintw (stdscr, " 7. Number of heads: %u\n", lp->dkl_n 
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lp->dkl magic - DKL MAGIC; 




waddstr (stdscr, "new value or <CR> for no change: ") ; 


lp->dkl_cksum - 0; 




input (stdscr, line); 


for (i - 0, wp - (unsigned short *)lp; i < si zeof (struct dk label) /2-1, 




if (line [ 0] — '\0') 


lp->dkl cksum *wp++; 




break; 


return; 




lp->dkl nhead •« atoi (line); 

} 





break; 

/******************************************************************************* 


case 8 : 


* 


* 



wprintw (stdscr, "8. # of sectors/track: %u\n", lp-> 

* 

Subroutine: newconf 

* 



waddstr (stdscr, "new value or <CR> for no change: ”); 



* 



input (stdscr, line); 

* 

Calling Sequence: newconf (lp) 

* 



if (line [0] »« '\0') 

* 


* 



break; 

* 

Called by: dolabel 

* 



lp->dkl nsect * atoi (line); 

* 


* 



break; 

* 

Calling Parameters: lp - pointer to label structure 

* 


case 9 : 




* 



wprintw (stdscr, " 9. Label location: %u\n", lp->dkl bh 

* 

Local Variables: 

* 



waddstr (stdscr, "new value or <CR> for no change: "); 

* 

wp - used to step through configuration info 

* 



input (stdscr, line); 

* 

i - looping 

* 



if ( line [0] ' \0' ) 



★ 



break; 

* 

Calls Subroutines: 

* 



lp->dkl bhead - atoi (line); 


ioctl - to pass the label command to the driver 

* 



break; 



* 


case 10 


* 

Public/Global Variables: 

* 



wprintw (stdscr, " 10. Physical partition #: %u\n", lp- 

* 

fieldnames - names of the disk configuration fields in the label 

* 



waddstr (stdscr, "new value or <CR> for no change: ") ; 



* 



input (stdscr, line); 

* 

Description : 




if (line [0] « '\0') 

* 

This subroutine allow the user to change the current 

* 



break; 

* 

setting of disk label. 

* 



lp->dkljppart = atoi(line); 






break; 

******************************************************************************* 

/ 


default 







wmove (stdscr, 6, 0); 

newconf (lp) 




wprintw (stdscr, "Invalid item %d.\n", item); 

register struct dk_label *lp; 




break; 

1 

int item, i; 



> 

} 



register unsigned short *wp; 


> 






/****** 

*************************** a********************************************** 


clriwin () ; 


* 


* 


clrowin () ; 


* 

Subroutine : 

dogeometry * 


while (1) { 


* 


* 


wmove (stdscr, 11, 0); 


* 

Calling Sequence: dogeometryO * 


wp - slp->dkl ape; 


* 


* 


for (i - 0; fieldnames [i] 1= NULL; i++, wp++) { 


* 

Called by: 

main * 


wmove (stdscr, 11 + i, 0); 


* 


* 


wprintw (stdscr, "%ld - %s <%d>\n", i + 1, fieldnames [i] 

* 

* 

Calling Parameters: None * 


wmove (stdscr, 5, 0); 


* 

Local Variables 

: * 


wclrtoeol (stdscr) ; 


* 


geometry - geometry information to pass to the driver * 


wmove (stdscr, 5, 0); 


* 


* 


wprintw (stdscr, "Enter item number to change, <CR> when done: 

) 

* 

Calls Subroutines: * 


input (stdscr, line); 


* 


ioctl - to get geometry info from the driver * 


wmove (stdscr, 6, 0); 


* 


and to pass new information to it * 


wclrtoeol (stdscr) ; 


* 


* 


if (line [ 0] «« '\0') 


* 

Public/Global Variables: * 


break; 




label - current label * 
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* 

line - buffer for user input 

* 

* 

Description : 

* 

* 


* 

* 

This subroutine resets the controller via ioctl call. 

* 

* 

Description : 

* 

* 

then sets up the adapter by General Options, Unit Options, 

* 

* 

This subroutine asks whether to use geometry information as it 

* 

* 

and Start Command list. 

* 

* 

exists in the kernel or from the current label . It then displays 

* 

* 


* 

* 

the geometry and asks whether to send it to the kernel. 

* 

******* 

*********************************************************************** 

*/ 

******************************************************************************4 

/ 

reset () 



dogeometry () 



int erreo; 



struct dk_geom geometry; 



clriwin () ; 
clrowin () ; 



clriwin () ; 



wmove (stdscr, 11, 0); 



clrowin () ; 



if (disk — -1) { 



wmove (stdscr, 5, 0); 



waddstr (stdscr, "You must open the disk first."); 



if (disk — -1) ( 



return; 



waddstr (stdscr, "You must open the disk before modifying the geo 


) 



return; 

> 



wrefresh (stdscr) ; 



waddstr (stdscr, "Enter 'k' to get disk geometry from the kernel, \n") ; 
waddstr (stdscr, "anything else will get it from the label: "); 



wmove (stdscr, 11, 0); 



line [0 ] - inp char (stdscr) ; 



waddstr (stdscr, "The adapter will be reset even if devices are currently 


if (line [0] — 'k') ( 



waddstr (stdscr, "Do not continue if there are mounted file systems or 

an 


waddstr (stdscr, "Kernel"); 



waddstr (stdscr, "currently being accessed! ! ! !\n*); 



if (ioctl (disk, DKIOCGGEOM, igeometry) < 0) { 



waddstr (stdscr, "Do you want to continue, y or n? ") ; 



wmove (stdscr , 7, 0); 



line [0] « inp char (stdscr) ! 040; 



wprintw (stdscr, "Get geometry: %s", sys errlist [errno] ) ; 


if (line [ 0] !- 'y') { 



return; 

> 



waddstr (stdscr, "No"); 
return; 



) else { 



} 



waddstr (stdscr, "Label"); 



waddstr (stdscr , "Yes"); 



geometry. dkg ncyl - label. dkl ncyl; 



wmove (stdscr, 15, 0); 



geometry. dkg acyl - label. dkl acyl; 



waddstr (stdscr, "Are you sure? "); 



geometry. dkg bcyl -0; 



line [0] - inp char (stdscr) | 040; 



geometry. dkg nhead - label. dkl nhead; 



if (line [ 0] !- 'y') { 



geometry. dkg bhead ■ label. dkl bhead; 



waddstr (std3cr, "No"); 



geometry. dkg_nsect - label ,dkl_nsect; 
geometry. dkg intrlv - label. dkl intrlv; 



return ; 

) 



geometry. dkg gapl - label. dkl gapl; 



waddstr (stdscr , "Yes"); 



geometry . dkg_gap2 «* label . dkl_gap2; 
geometry. dkg ape “ label. dkl ape; 



wmove (stdscr, 15, 0); 



} 



errno =0; 

if (ioctl (disk, RFIOCRESET, 0)) { 


) 

showgeometry (ageometry) ; 



wprintw (stdscr, "RFIOCRESET: %s\n", sys_errlist [errno] ) ; 
wrefresh(stdscr) ; 


/***************************************************************************** 

** 


return ; 


* 

Subroutine : showgeomet ry 

* 


> 

waddstr (stdscr, "RETURNDED from RFIOCRESET\n") ; 


* 


* 


wref resh(stdscr) ; 


* 

Calling Sequence: showgeomet ry (gp) 

* 




* 


* 


errno * 0; 


* 

Called by: dogeometry, domap 

* 


if (ioctl (disk, RFIOCGENOPT, 0)) { 


* 


* 


wprintw (stdscr, "RFIOCGENOPT: %s\n", sys errlist [errno] ) ; 


* 

Calling Parameters: gp - pointer to geometry information to display 



wref resh(stdscr) ; 
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Local Variables: None 

Calls Subroutines : None 


return; 

> 

waddstr (stdscr, "RETURNDED from RFIOCGENOPT\n") ; 
wre fresh (stdscr) ; 


Public/Global Variables : None 
Description : 


This subroutine displays the disk geometry information 
passed to it. 


****************** 


showgeometry (gp) 

register struct dk_geom *gp; 


register int i; 


wmove (stdscr, 11, 0); 

wprintw (stdscr, "# of alternates per cylinder is %d\n", gp->dkg_apc) ; 
wmove (stdscr, 12, 0); 

wprintw (stdscr, "# of data cylinders is %d\n", gp->dkg_ncyl) ; 
wmove (stdscr, 13, 0); 

wprintw (stdscr, "# of alternate cylinders is %d\n", gp->dkg_acyl) ; 
wmove (stdscr, 14, 0); 

wprintw (stdscr, "cyl offset (for fixed head area) is %d\n", gp->dkg_bcyl 
wmove (stdscr, 15, 0); 

wprintw (stdscr, "# of heads is %d\n", gp->dkg_nhead) ; 
wmove (stdscr, 16, 0); 

wprintw (stdscr, "head offset (for Larks, etc.) is %d\n n , gp->dkg_bhead) ; 
wmove (stdscr, 17, 0); 

wprintw (stdscr, "# of sectors per track is %d\n", gp->dkg_nsect) ; 
wmove (stdscr, 18, 0); 

wprintw (stdscr, "# of spare sectors per track is %d\n", gp->dkg_extra [0] 
wmove (stdscr, 19, 0); 

wprintw (stdscr, "interleave factor is %d\n", gp->dkg_intrlv) ; 
wmove (stdscr, 20, 0) ; 

wprintw (stdscr, "gap 1 size is %d\n", gp->dkg_gapl) ; 
wmove (stdscr, 21, 0); 

wprintw (stdscr, "gap 2 size is %d\n", gp->dkg_gap2) ; 


************ 


Subroutine : 

Calling Sequence: 
Called by: 

Local Variables: 
Calls Subroutines: 


reset 
reset () 
main 
None 
ioctl 


errno = 0; 

if (ioctl (disk, RFIOCUNITOPT, 0) < 0) ( 

wprintw (stdscr, "RFIOCUNITOPT: %s\n", sys_errlist [errno] ) ; 

wrefresh(stdscr) ; 

return; 

> 

waddstr (stdscr, "RETURNDED from RFIOCUNITOPT\n") ; 

wre fresh (stdscr) ; 

errno - 0; 

if (ioctl (disk, RFIOCCMDLST, 0)) ( 

wprintw (stdscr, "RFIOCMDLST: %s\n", sys_errlist [errno] ) ; 
return ; 

) 

disk = -1; 

waddstr (stdscr , "Calling opendevice\n") ; 

wre fresh (stdscr) ; 

if (opendevice (diskname) < 0) { 
wrefresh (stdscr) ; 
endwin () ; 
printf ("\n") ; 

error ("Can't open device after adapter reset."); 
exit (-1) ; 

> 

waddstr (stdscr, "Returned from opendevice -returning\n") ; 

wrefresh (stdscr) ; 

return (0) ; 


******* 


Subroutine: domodsen 

Calling Sequence: domodsen () 

Called by: main 

Local Variables: None 

Calls Subroutines: ioctl 

Public/Global Variables : None 
Description: 


This subroutine displays the disk geometry information 
passed to it, 




************* 


Public/Global Variables :None 
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int i; 

domodsen ( ) 



clriwin () ; 

page 3 p3; 

clrowin () ; 

page 4 p4; 


inq_data inqdat; 

if (ioctl (disk, RFIOCMDSEN, iparm list)) 

int offset; 

{ 

dword ncyl; 

wprintw (stdscr, "RFIOCMDSEN: %s\n", sys errlist [errno] ) ; 

lnt nhead; 

wref resh (stdscr) ; 

unsigned short ape, acyl, nsect, intrlv; 

pak ( ) ; 

char ascii lab[128]; 

return ; 

struct dk_label *lp; 

} 

p3.page_code - 3; 

speed - (parm list.byte2 & OxQF); 

p4.page_code - 4; 

buffered - ((parm list.byte2 » 4) a 0x07); 


density - parm list. density code; 

clriwin () ; 

blklen - ((parm list .blklenfO] « 16) | 

clrowin () ; 

(parm list . blklen [ 1] « 8) | 


parm list .blklen [2] ) ; 

#ifdef notyet 


if (ioctl (disk, RFIOCMDSEN4, 4p4)> 

/* Display mode select menu */ 

{ 

for (i=0; i < 4; i++) { 

wprintw (stdscr, "RFIOCMDSEN4 : %s\n", sys errlist [errno] ) ; 

wmove (stdscr, 13 + i, 0); 

wref resh(stdscr) ; 

wprintw (stdscr, "*-36. 36s %x\n”, menu[i], *params[i]); 

return; 

> 


wmove (stdscr, 18, 0); 

ncyl - p4.ncyl_bl; 

wprintw (stdscr, "Number of blocks » %02x*02x*02x\n", parm list . nblk [0] , 

ncyl - (ncyl « 8) | p4.ncyl b2; 

wrefresh(stdscr) ; 

nhead - p4 . nhead; 



again: 

wmove (stdscr, 11, 0); 

do 

wprintw (stdscr, "# of cyl - %d # of hds * %d\n", ncyl, p4. nhead); 

{ 

wref resh (stdscr) ; 

first * 1; 


do 

#endif 

{ 

if (ioctl (disk, RFIOCMDSEN3, &p3) ) 

if ( ! first) 

wprintw (stdscr, "RFI0CMDSEN3 : %s\n", sys errlist [errno] ) ; 

{ 

wmove (stdscr, 10, 0); 

wref resh (stdscr) ; 

waddstr (stdscr, "Illegal Entry, try again - ") ; 

return; 

} 

) 

first - FALSE; 


wmove (stdscr, 10, 32); 

if (p3. alttpzone !« 0) 

waddstr (stdscr, "Number to change, <CR> when done: "); 

ape - p3.altspzone / p3 . alttpzone; 

line[0] * inp char (stdscr) ; 

else 

if (line [0] ««= ' \r' || line[0] =- ' \n' ) 

ape - 0; 

goto done; 

ape « ape * nhead; 

if ( isalpha ( line [0] ) ) 

if (p3 . alttpvol) 

( 

acyl - p3. alttpvol / nhead; 

if ( isupper (line [0] ) ) 

nsect * p3.spt; 

line[0] = tolower (line [0] ) ; 

intrlv =» p3 . interleave; 

) 


) while (line [0] < ' 1' || line[0] > '4'); 

wmove (stdscr, 13, 0); 


wprintw (stdscr, "ape * %d nsect - %d intrlv = %d\n”, ape, nsect, intrlv 

menu_select =• (line[Q] - '1'); 
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wref resh (stdscr) ; 



wmove (stdscr, 13 + menu_select, 38); 


input (stdscr, line); 

if (ioctl (disk, RFIOCINQ, iinqdat) ) 
( 

sscanf(line, ”%x", params [menu_select ] ) ; 

wprintw (stdscr, "RFIOCINQ: %s\n”, sys_errlist [errno] ) ; 

} while (TRUE); 

wref resh (stdscr ) ; 


return; 

done: 

inqdat .vend_uniq[ 10] - 0; 

parm_list .byteO = 0; 

inqdat .vend_uniq[ 18] - 0; 

speed 4= Oxf; 


buffered 6= 0x7; 

wprintw (stdscr, "%s %s\n", ainqdat . vend_uniq [3] , & inqdat . vend_uniq[ 11] ) 

parm_list .byte 2 * ((buffered « 4) | speed); 

wrefresh (stdscr) ; 



parm_list .nblk [0] “ parm_list . nblk [1 ] = parm_list .nblk [2] * 0; 

sprintf (ascii_lab, "%s-*s cyl %d alt %d hd %d sec %d ape %d", ainqdat.ve 

parm_list . density_code - density; 

wprintw (stdscr, "%s\n", ascii_lab) ; 

if (ioctl (disk, RFIOCMDSEL, sparm list)) 

wrefresh(stdscr) ; 

{ 


wprintw (stdscr, "RFIOCMDSEL: %s\n" , sys_errlist [errno] ) ; 

label. dkl ape « ape; 

wref resh(stdscr) ; 

label . dkl_gapl - 0; 

pak () ; 

label . dkl_gap2 » 0; 

return; 

label ,dkl_intrlv « intrlv; 

} 

label . dkl_ncyl - ncyl; 

pak ( ) ; 

label . dkl_acyl - acyl; 

} 

label . dkl_nhead - nhead; 


label . dkl_nsect - nsect; 

/************************************************* *****************************/ 

lp « & label; 

} 

defect () 

/******************************************************************************* 

{ 

* * 

def_list def_lst; 

* Subroutine: dodensity * 

dword *lba, *len; 

* * 

read cap cap; 

* Calling Sequence: dodensity () * 

int i; 

* it 

int j ; 

* Called by: main * 

int deflst_sel; 

* * 

int list_fmt; 

* Local Variables: None * 

int good_deflist * 0; 

* Calls Subroutines: ioctl * 

clriwin () ; 

* * 

clrowin () ; 

* Public/Global Variables : None * 

wmove (stdscr, 5, 0); 

★ * 

if (disk — -1) { 

* Description: * 

waddstr (stdscr, "You must open the disk first."); 

* This subroutine displays the disk geometry information * 

return; 

* passed to it. * 

} 

* * 

/* Don't read defect list unless user wants to */ 

***************************************************** **************************/ 

def_lst .list [0] * 0; 

dodensity () 

lba « (dword *)6cap; 

{ 

len - (dword *) cap. blklen; 

mode_sel parm_list; 

*lba - 0; 

int menu_select; 


int first; 

errno =0; 
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if (ioctl (disk, RFIOCRDCAP, icap) < 0) { 

if ( special <— » ' \n' ) ( 

wprintw (stdscr, "RFIOCRDCAP: %s" # sys errlist [errno] ) ; 

*num * value; 

return (-1) ; 

return (1) ; 

} 

return (2) ; 

waddstr (atdscr, "Enter 'y' to include a defect list during format: 

) 

line [0] - inp char(stdscr) | 040; 


if (line [0] — 'y') { 

/* 

waddstr (stdscr, "Yes”); /* Usr wants defect list */ 

* We only use upper-case, convert "special", and check to see 

waddstr (stdscr, "\nEnter choice of defect list from menu below: 

* if "special" was entered 

/* Display defect list menu options */ 

*/ 

for (i-0; i < 3; i++) { 


wmove (stdscr, 8 + i, 0); 

u special « buff(O); 

wprintw {stdscr, "%-45.453 \n", defect menufi]); 


} 

if ( islower{ (int)u special) ) 


u special - (char) toupper ( (int) u special); 

/* Move curser to top of menu and wait for entry by user */ 


while (TRUE) 

if ( special -« u special ) ( 

{ 

*num - value; 

wmove (stdscr, 6, 46); 

return (1) ; 

wclrtoeol (stdscr) ; 

> 

input (stdscr, line); /* Get user input */ 

else if ( u special •« 'Q' ) 

sscanf (line , "%x", adeflst sel) ; /* chng from ascii to # 

return (3) ; 

/* Check for valid menu selection */ 

else { 

if (de fist sel > 0 tk deflst sel < 4) 

/* 

{ 

* Maybe a "real" number, check each character to be sure 

/* Set read defect list cmd blk - byte 2 */ 

* that only digits were entered 

list fmt « defect byte2 (deflst sel); 

*/ 

wmove (atdscr, 7, 0); 


wclrtoeol (stdscr) ; 

for ( ptr » buff; *ptr; ptr++ ) { 

break; 

if ( ! (isdigit ( (int) *ptr) ) ) { 

> 

move (error line, 0); 


clrtoeol () ; 

wmove (stdscr, 7, 0) ; 

move (error line, 0); 

waddstr (stdscr, "Illegal entry, try again\n”) ; 

printw("'%c' is not numeric", *ptr) ; 

wrefresh (stdscr) ; 

refresh () ; 

} 

* num - 0 ; 


return (-1) ; 

/* Read the defect list, trying all 3 defect list formats 

) 

* until one works. Some drives may only support one format. 

> 

*/ 

/* Convert the string to an integer */ 

for ( j“0; j < 3; j++) 


{ 

*num * atoi (buff) ; 

def 1st. list [0] - (list fmt | defect 1st frat[i]); 

) 

if (ioctl (disk, RFIOCRDDEF, &def 1st) >= 0) 

/* User entered a number */ 

good def list « 1; 

return (0) ; 

break; 

) 

} 

/* center line: 


Center a message on stdscrn at the given line. Assumes no new-lines, 

} 

returns, tabs, or other unusual characters in the message */ 

if ( !good deflist) 

center line (line, message) 

{ 

int line; 

waddstr (stdscr, "Read defect list command failed\n") ; 

char message [ ] ; 

wprintw (stdscr, "RFIOCRDDEF: %s", sys_errlist [errno] ) ; 

( 

Nov 28 12:10 1989 cs35ut.c Page 76 

Nov 28 12:10 1989 cs35ut.c Page 78 

wrefresh (stdscr) ; 

move (line, 0) ; 

return (-1) ; 

clrtoeol () ; 

> 

move (line, (COLS-st rlen (message) ) /2) ; 


addstr (message) ; 

} else 
/ 

) /* center_line */ 

i 

waddstr (stdscr, "No"); 

/* Overlap: 

} 

* Check to see if the partition passed is overlapping with other 

> 

* partitions. Return the overlapping partitions. 

/************************************************************************ 

*/ 

* * 

overlap (partition) 

* get_number * 

int partition; /* Partition to check */ 

* Function: * 

{ 

register struct dk_map *map; 

* Function to read a number from the user * 

register int i, j; 

* * 

register check_start, check_end; /* starting and ending blocks 

* Inputs : * 

* for passed in partition */ 

* num - address of number for storing * 

register int start *= 0; 

* special - Special non-numeric input character * 

register int multiplier * label .dkl_nhead * label .dkl_nsect; 

* value - value to set "num" to if "special" * 

register int overlap * 0; 

* is seen * 


* error_line - line number of a line to use for * 


* displaying errors * 

/* 

* * 

* Calculate the partition to check' s parameters 

* Outputs: * 

*/ 

* -1 - error * 


* 0 - number was read * 

map » fclabel .dkl_map [partition) ; 

* 1 - "special" was seen * 

check_start - map->dkl_cylno * multiplier; 

* 2 empty line * 

check_end « check_start + map->dkl_nblk; 

* 3 user specified quit ('q') * 


* * 

/* If partition is 0 megabytes, don't check overlaps */ 

********************************************************************* ***/ 

if ( (check_start ««■ 0) && (check_end » 0)) 

int 

{ 

return (overlap) ; 

get_number (num, special, value, error_line) 

) 

daddr_t *num; /* place to store number */ 


char special; /* non-numeric input character */ 

/* 

daddr_t value; /* value to set to *num if 'special' is typed */ 

* Look through the partition map and find all overlapping 

int error__line; /* Error line number */ 

* partitions 

register char *ptr; 

*/ 

char *buff « line; 

for ( i = 0, j*=0, map - 1 abe 1 , dkl_map ; i < NDKMAP; i++, map++ ) { 

char u_special; 

/* Skip ourselves */ 


if ( i — partition ) 


continue; 

/* Get a line of input */ 



/* Does it overlap ?? */ 

input (stdscr, buff); 

start = map->dkl_cylno * multiplier; 


if ( (start > check_start) && (start < check_end) ) 

/* 

overlap )* (1 « i) ; /* Yes */ 

* If empty line and the "special" character is not new-line. 

else if ( ({start + map~>dkl_nblk) > check_start) 

* return an error. If empty line and "special" is new-line. 

&& ({start + map->dkl_nblk) < check_end) ) 

* return "special seen". 

overlap t « <1 << i) ; 

*/ 

else if ( (start <* check_start) && 


( ( start + map~>dkl_nblk) >= check_end) ) 

if { buf f [0] »« '\0' ) { 

overlap f» (1 << i) ; 
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Skip the hog partition and any that have the entire di 
allocated. 


if ( { i Hog) I | (cpart->dkl_nblk — Blocks) ) 
continue; 


Calculate the last cylinder used by this partition. Ii 
it is the largest so far, remember it 


end_cyl ■» (long) (cpart->dkl_cylno + 

( cpart ->dk l_nblk / Cblocks) - 1); 
if ( end_cyl > last_cyl ) 

last_cyl “ end_cyl; 


The "hog” starts at the last assigned (cylinder + 1) 
and is (Blocks - start) in length 


last_cyl++; 

if ( last_cyl >- label .dkl_ncyl ) { 

/* Must already have a hog partition */ 
hog->dkl_cylno - (daddr_t)0; 
hog->dkl_nblk « (daddr_t)0; 


hog->dkl_cylno » (daddr_t) last_cyl ; 

hog->dkl_nblk = (daddr_t) (Blocks - (hog->dkl_cylno * Cblocks)) 


#endif /* H0G_PARTITI0N */ 
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Function: 

This function is used to calculate the "hog" partition 
values. The "hog" partition is defined as the partition used to 
hold all blocks from the last assigned block to the end of 
volume . 


#ifdef HOG_PARTI TI ON 

static void 
new_hog( ) 

{ 

register struct dk_map *cpart * label .dkl_map; 
register struct dk_map *hog - ilabel . dkl_map [Hog] ; 
register int last_cyl - 0; 
register int i, zero; 
register long end_cyl; 

if ( Hog — N0_H0G ) 
return; 


/* If the partition table is all zero's, don't calculate 

* the free hog. Else you will kill cs35ut with a core 

* file and an Arithmetic exeption. 

*/ 

for ( i * MINPART, zero - TRUE; i < MAXPART; i++) 

{ 

if ( cpart ->dkl_nblk > 0) 

{ 

zero * FALSE; 
break; 


if (zero) 

return; 


Find the last assigned cylinder 


for ( i = MINPART; i < MAXPART; i++, cpart++ ) { 




